unit schRecibosProveedorServer_Intf; interface uses Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, 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_ListaAnosRecibosDelta = '{E8A296C6-C6C6-4821-ABD1-65EE5C5CE5E7}'; RID_RecibosCompensadosProvDelta = '{6210EF83-7686-4674-A385-B7071237FACB}'; RID_RecibosProveedorDelta = '{41AE7B3A-2837-467C-9EF5-EE52952DC66E}'; RID_PagosProveedorDelta = '{42CA510C-C01E-4C46-A221-CE6EF13D95EA}'; type { IListaAnosRecibosDelta } IListaAnosRecibosDelta = interface(IListaAnosRecibos) ['{E8A296C6-C6C6-4821-ABD1-65EE5C5CE5E7}'] { Property getters and setters } function GetOldANOValue : String; { Properties } property OldANO : String read GetOldANOValue; end; { TListaAnosRecibosBusinessProcessorRules } TListaAnosRecibosBusinessProcessorRules = class(TDABusinessProcessorRules, IListaAnosRecibos, IListaAnosRecibosDelta) private protected { Property getters and setters } function GetANOValue: String; virtual; function GetANOIsNull: Boolean; virtual; function GetOldANOValue: String; virtual; function GetOldANOIsNull: Boolean; virtual; procedure SetANOValue(const aValue: String); virtual; procedure SetANOIsNull(const aValue: Boolean); virtual; { Properties } property ANO : String read GetANOValue write SetANOValue; property ANOIsNull : Boolean read GetANOIsNull write SetANOIsNull; property OldANO : String read GetOldANOValue; property OldANOIsNull : Boolean read GetOldANOIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; destructor Destroy; override; end; { IRecibosCompensadosProvDelta } IRecibosCompensadosProvDelta = interface(IRecibosCompensadosProv) ['{6210EF83-7686-4674-A385-B7071237FACB}'] { 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 GetOldREFERENCIA_FACTURA_PROVValue : String; function GetOldFECHA_FACTURAValue : DateTime; function GetOldFORMA_PAGO_FACTURAValue : String; function GetOldIMPORTE_FACTURAValue : Currency; 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 GetOldID_EMPRESAValue : Integer; function GetOldID_PROVEEDORValue : Integer; function GetOldNOMBRE_PROVEEDORValue : String; function GetOldNOMBRE_COMERCIALValue : String; function GetOldENTIDAD_PROVEEDORValue : String; function GetOldSUCURSAL_PROVEEDORValue : String; function GetOldDC_PROVEEDORValue : String; function GetOldCUENTA_PROVEEDORValue : String; function GetOldNIF_CIFValue : String; function GetOldNOMBREValue : String; function GetOldCALLEValue : String; function GetOldPOBLACIONValue : String; function GetOldCODIGO_POSTALValue : String; function GetOldPROVINCIAValue : String; function GetOldFECHA_ALTAValue : DateTime; function GetOldFECHA_MODIFICACIONValue : DateTime; function GetOldUSUARIOValue : String; function GetOldID_TIENDAValue : Integer; function GetOldTIENDAValue : 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 OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue; property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue; property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue; property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue; property OldID_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 OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue; property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue; property OldNOMBRE_COMERCIAL : String read GetOldNOMBRE_COMERCIALValue; 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 OldNIF_CIF : String read GetOldNIF_CIFValue; property OldNOMBRE : String read GetOldNOMBREValue; property OldCALLE : String read GetOldCALLEValue; property OldPOBLACION : String read GetOldPOBLACIONValue; property OldCODIGO_POSTAL : String read GetOldCODIGO_POSTALValue; property OldPROVINCIA : String read GetOldPROVINCIAValue; property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue; property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue; property OldUSUARIO : String read GetOldUSUARIOValue; property OldID_TIENDA : Integer read GetOldID_TIENDAValue; property OldTIENDA : String read GetOldTIENDAValue; end; { TRecibosCompensadosProvBusinessProcessorRules } TRecibosCompensadosProvBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosCompensadosProv, IRecibosCompensadosProvDelta) private protected { Property getters and setters } function GetIDValue: Integer; virtual; function GetIDIsNull: Boolean; virtual; function GetOldIDValue: Integer; virtual; function GetOldIDIsNull: Boolean; virtual; procedure SetIDValue(const aValue: Integer); virtual; procedure SetIDIsNull(const aValue: Boolean); virtual; function GetID_RECIBO_COMPENSADOValue: Integer; virtual; function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual; function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual; function GetOldID_RECIBO_COMPENSADOIsNull: Boolean; virtual; procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual; procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_REC_COMPENSADOValue: String; virtual; function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual; function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual; function GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual; procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual; procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); virtual; function GetREFERENCIAValue: String; virtual; function GetREFERENCIAIsNull: Boolean; virtual; function GetOldREFERENCIAValue: String; virtual; function GetOldREFERENCIAIsNull: Boolean; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_PROVEEDORValue: String; virtual; function GetREFERENCIA_PROVEEDORIsNull: Boolean; virtual; function GetOldREFERENCIA_PROVEEDORValue: String; virtual; function GetOldREFERENCIA_PROVEEDORIsNull: Boolean; virtual; procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual; procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetSITUACIONValue: String; virtual; function GetSITUACIONIsNull: Boolean; virtual; function GetOldSITUACIONValue: String; virtual; function GetOldSITUACIONIsNull: Boolean; virtual; procedure SetSITUACIONValue(const aValue: String); virtual; procedure SetSITUACIONIsNull(const aValue: Boolean); virtual; function GetID_FACTURAValue: Integer; virtual; function GetID_FACTURAIsNull: Boolean; virtual; function GetOldID_FACTURAValue: Integer; virtual; function GetOldID_FACTURAIsNull: Boolean; virtual; procedure SetID_FACTURAValue(const aValue: Integer); virtual; procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_FACTURA_PROVValue: String; virtual; function GetREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual; function GetOldREFERENCIA_FACTURA_PROVValue: String; virtual; function GetOldREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual; procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual; procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); virtual; function GetFECHA_FACTURAValue: DateTime; virtual; function GetFECHA_FACTURAIsNull: Boolean; virtual; function GetOldFECHA_FACTURAValue: DateTime; virtual; function GetOldFECHA_FACTURAIsNull: Boolean; virtual; procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual; procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual; function GetFORMA_PAGO_FACTURAValue: String; virtual; function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual; function GetOldFORMA_PAGO_FACTURAValue: String; virtual; function GetOldFORMA_PAGO_FACTURAIsNull: Boolean; virtual; procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual; procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual; function GetIMPORTE_FACTURAValue: Currency; virtual; function GetIMPORTE_FACTURAIsNull: Boolean; virtual; function GetOldIMPORTE_FACTURAValue: Currency; virtual; function GetOldIMPORTE_FACTURAIsNull: Boolean; virtual; procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual; procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean); virtual; function GetID_REMESAValue: Integer; virtual; function GetID_REMESAIsNull: Boolean; virtual; function GetOldID_REMESAValue: Integer; virtual; function GetOldID_REMESAIsNull: Boolean; virtual; procedure SetID_REMESAValue(const aValue: Integer); virtual; procedure SetID_REMESAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_REMESAValue: String; virtual; function GetREFERENCIA_REMESAIsNull: Boolean; virtual; function GetOldREFERENCIA_REMESAValue: String; virtual; function GetOldREFERENCIA_REMESAIsNull: Boolean; virtual; procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual; procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual; function GetFECHA_EMISIONValue: DateTime; virtual; function GetFECHA_EMISIONIsNull: Boolean; virtual; function GetOldFECHA_EMISIONValue: DateTime; virtual; function GetOldFECHA_EMISIONIsNull: Boolean; virtual; procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual; procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual; function GetFECHA_VENCIMIENTOValue: DateTime; virtual; function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual; function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual; function GetOldFECHA_VENCIMIENTOIsNull: Boolean; virtual; procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual; procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; function GetOldDESCRIPCIONValue: String; virtual; function GetOldDESCRIPCIONIsNull: Boolean; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; function GetOBSERVACIONESValue: String; virtual; function GetOBSERVACIONESIsNull: Boolean; virtual; function GetOldOBSERVACIONESValue: String; virtual; function GetOldOBSERVACIONESIsNull: Boolean; virtual; procedure SetOBSERVACIONESValue(const aValue: String); virtual; procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual; function GetIMPORTEValue: Currency; virtual; function GetIMPORTEIsNull: Boolean; virtual; function GetOldIMPORTEValue: Currency; virtual; function GetOldIMPORTEIsNull: Boolean; virtual; procedure SetIMPORTEValue(const aValue: Currency); virtual; procedure SetIMPORTEIsNull(const aValue: Boolean); virtual; function GetOTROS_GASTOSValue: Currency; virtual; function GetOTROS_GASTOSIsNull: Boolean; virtual; function GetOldOTROS_GASTOSValue: Currency; virtual; function GetOldOTROS_GASTOSIsNull: Boolean; virtual; procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual; procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual; function GetIMPORTE_TOTALValue: Currency; virtual; function GetIMPORTE_TOTALIsNull: Boolean; virtual; function GetOldIMPORTE_TOTALValue: Currency; virtual; function GetOldIMPORTE_TOTALIsNull: Boolean; virtual; procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual; procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual; function GetID_EMPRESAValue: Integer; virtual; function GetID_EMPRESAIsNull: Boolean; virtual; function GetOldID_EMPRESAValue: Integer; virtual; function GetOldID_EMPRESAIsNull: Boolean; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual; function GetID_PROVEEDORValue: Integer; virtual; function GetID_PROVEEDORIsNull: Boolean; virtual; function GetOldID_PROVEEDORValue: Integer; virtual; function GetOldID_PROVEEDORIsNull: Boolean; virtual; procedure SetID_PROVEEDORValue(const aValue: Integer); virtual; procedure SetID_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNOMBRE_PROVEEDORValue: String; virtual; function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual; function GetOldNOMBRE_PROVEEDORValue: String; virtual; function GetOldNOMBRE_PROVEEDORIsNull: Boolean; virtual; procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual; procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNOMBRE_COMERCIALValue: String; virtual; function GetNOMBRE_COMERCIALIsNull: Boolean; virtual; function GetOldNOMBRE_COMERCIALValue: String; virtual; function GetOldNOMBRE_COMERCIALIsNull: Boolean; virtual; procedure SetNOMBRE_COMERCIALValue(const aValue: String); virtual; procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); virtual; function GetENTIDAD_PROVEEDORValue: String; virtual; function GetENTIDAD_PROVEEDORIsNull: Boolean; virtual; function GetOldENTIDAD_PROVEEDORValue: String; virtual; function GetOldENTIDAD_PROVEEDORIsNull: Boolean; virtual; procedure SetENTIDAD_PROVEEDORValue(const aValue: String); virtual; procedure SetENTIDAD_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetSUCURSAL_PROVEEDORValue: String; virtual; function GetSUCURSAL_PROVEEDORIsNull: Boolean; virtual; function GetOldSUCURSAL_PROVEEDORValue: String; virtual; function GetOldSUCURSAL_PROVEEDORIsNull: Boolean; virtual; procedure SetSUCURSAL_PROVEEDORValue(const aValue: String); virtual; procedure SetSUCURSAL_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetDC_PROVEEDORValue: String; virtual; function GetDC_PROVEEDORIsNull: Boolean; virtual; function GetOldDC_PROVEEDORValue: String; virtual; function GetOldDC_PROVEEDORIsNull: Boolean; virtual; procedure SetDC_PROVEEDORValue(const aValue: String); virtual; procedure SetDC_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetCUENTA_PROVEEDORValue: String; virtual; function GetCUENTA_PROVEEDORIsNull: Boolean; virtual; function GetOldCUENTA_PROVEEDORValue: String; virtual; function GetOldCUENTA_PROVEEDORIsNull: Boolean; virtual; procedure SetCUENTA_PROVEEDORValue(const aValue: String); virtual; procedure SetCUENTA_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNIF_CIFValue: String; virtual; function GetNIF_CIFIsNull: Boolean; virtual; function GetOldNIF_CIFValue: String; virtual; function GetOldNIF_CIFIsNull: Boolean; virtual; procedure SetNIF_CIFValue(const aValue: String); virtual; procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual; function GetNOMBREValue: String; virtual; function GetNOMBREIsNull: Boolean; virtual; function GetOldNOMBREValue: String; virtual; function GetOldNOMBREIsNull: Boolean; virtual; procedure SetNOMBREValue(const aValue: String); virtual; procedure SetNOMBREIsNull(const aValue: Boolean); virtual; function GetCALLEValue: String; virtual; function GetCALLEIsNull: Boolean; virtual; function GetOldCALLEValue: String; virtual; function GetOldCALLEIsNull: Boolean; virtual; procedure SetCALLEValue(const aValue: String); virtual; procedure SetCALLEIsNull(const aValue: Boolean); virtual; function GetPOBLACIONValue: String; virtual; function GetPOBLACIONIsNull: Boolean; virtual; function GetOldPOBLACIONValue: String; virtual; function GetOldPOBLACIONIsNull: Boolean; virtual; procedure SetPOBLACIONValue(const aValue: String); virtual; procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual; function GetCODIGO_POSTALValue: String; virtual; function GetCODIGO_POSTALIsNull: Boolean; virtual; function GetOldCODIGO_POSTALValue: String; virtual; function GetOldCODIGO_POSTALIsNull: Boolean; virtual; procedure SetCODIGO_POSTALValue(const aValue: String); virtual; procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual; function GetPROVINCIAValue: String; virtual; function GetPROVINCIAIsNull: Boolean; virtual; function GetOldPROVINCIAValue: String; virtual; function GetOldPROVINCIAIsNull: Boolean; virtual; procedure SetPROVINCIAValue(const aValue: String); virtual; procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual; function GetFECHA_ALTAValue: DateTime; virtual; function GetFECHA_ALTAIsNull: Boolean; virtual; function GetOldFECHA_ALTAValue: DateTime; virtual; function GetOldFECHA_ALTAIsNull: Boolean; virtual; procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual; procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual; function GetFECHA_MODIFICACIONValue: DateTime; virtual; function GetFECHA_MODIFICACIONIsNull: Boolean; virtual; function GetOldFECHA_MODIFICACIONValue: DateTime; virtual; function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual; procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual; procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual; function GetUSUARIOValue: String; virtual; function GetUSUARIOIsNull: Boolean; virtual; function GetOldUSUARIOValue: String; virtual; function GetOldUSUARIOIsNull: Boolean; virtual; procedure SetUSUARIOValue(const aValue: String); virtual; procedure SetUSUARIOIsNull(const aValue: Boolean); virtual; function GetID_TIENDAValue: Integer; virtual; function GetID_TIENDAIsNull: Boolean; virtual; function GetOldID_TIENDAValue: Integer; virtual; function GetOldID_TIENDAIsNull: Boolean; virtual; procedure SetID_TIENDAValue(const aValue: Integer); virtual; procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual; function GetTIENDAValue: String; virtual; function GetTIENDAIsNull: Boolean; virtual; function GetOldTIENDAValue: String; virtual; function GetOldTIENDAIsNull: Boolean; virtual; procedure SetTIENDAValue(const aValue: String); virtual; procedure SetTIENDAIsNull(const aValue: Boolean); virtual; { Properties } property ID : Integer read GetIDValue write SetIDValue; property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull; property OldID : Integer read GetOldIDValue; property OldIDIsNull : Boolean read GetOldIDIsNull; property ID_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue; property ID_RECIBO_COMPENSADOIsNull : Boolean read GetID_RECIBO_COMPENSADOIsNull write SetID_RECIBO_COMPENSADOIsNull; property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue; property OldID_RECIBO_COMPENSADOIsNull : Boolean read GetOldID_RECIBO_COMPENSADOIsNull; property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue; property REFERENCIA_REC_COMPENSADOIsNull : Boolean read GetREFERENCIA_REC_COMPENSADOIsNull write SetREFERENCIA_REC_COMPENSADOIsNull; property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue; property OldREFERENCIA_REC_COMPENSADOIsNull : Boolean read GetOldREFERENCIA_REC_COMPENSADOIsNull; property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; property OldREFERENCIA : String read GetOldREFERENCIAValue; property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull; property REFERENCIA_PROVEEDOR : String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue; property REFERENCIA_PROVEEDORIsNull : Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull; property OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue; property OldREFERENCIA_PROVEEDORIsNull : Boolean read GetOldREFERENCIA_PROVEEDORIsNull; property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue; property SITUACIONIsNull : Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull; property OldSITUACION : String read GetOldSITUACIONValue; property OldSITUACIONIsNull : Boolean read GetOldSITUACIONIsNull; property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue; property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull; property OldID_FACTURA : Integer read GetOldID_FACTURAValue; property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull; property REFERENCIA_FACTURA_PROV : String read GetREFERENCIA_FACTURA_PROVValue write SetREFERENCIA_FACTURA_PROVValue; property REFERENCIA_FACTURA_PROVIsNull : Boolean read GetREFERENCIA_FACTURA_PROVIsNull write SetREFERENCIA_FACTURA_PROVIsNull; property OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue; property OldREFERENCIA_FACTURA_PROVIsNull : Boolean read GetOldREFERENCIA_FACTURA_PROVIsNull; property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue; property FECHA_FACTURAIsNull : Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull; property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue; property OldFECHA_FACTURAIsNull : Boolean read GetOldFECHA_FACTURAIsNull; property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue; property FORMA_PAGO_FACTURAIsNull : Boolean read GetFORMA_PAGO_FACTURAIsNull write SetFORMA_PAGO_FACTURAIsNull; property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue; property OldFORMA_PAGO_FACTURAIsNull : Boolean read GetOldFORMA_PAGO_FACTURAIsNull; property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue; property IMPORTE_FACTURAIsNull : Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull; property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue; property OldIMPORTE_FACTURAIsNull : Boolean read GetOldIMPORTE_FACTURAIsNull; property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue; property ID_REMESAIsNull : Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull; property OldID_REMESA : Integer read GetOldID_REMESAValue; property OldID_REMESAIsNull : Boolean read GetOldID_REMESAIsNull; property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue; property REFERENCIA_REMESAIsNull : Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull; property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue; property OldREFERENCIA_REMESAIsNull : Boolean read GetOldREFERENCIA_REMESAIsNull; property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue; property FECHA_EMISIONIsNull : Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull; property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue; property OldFECHA_EMISIONIsNull : Boolean read GetOldFECHA_EMISIONIsNull; property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue; property FECHA_VENCIMIENTOIsNull : Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull; property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue; property OldFECHA_VENCIMIENTOIsNull : Boolean read GetOldFECHA_VENCIMIENTOIsNull; property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull; property OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue; property OBSERVACIONESIsNull : Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull; property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue; property OldOBSERVACIONESIsNull : Boolean read GetOldOBSERVACIONESIsNull; property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue; property IMPORTEIsNull : Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull; property OldIMPORTE : Currency read GetOldIMPORTEValue; property OldIMPORTEIsNull : Boolean read GetOldIMPORTEIsNull; property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue; property OTROS_GASTOSIsNull : Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull; property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue; property OldOTROS_GASTOSIsNull : Boolean read GetOldOTROS_GASTOSIsNull; property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue; property IMPORTE_TOTALIsNull : Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull; property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue; property OldIMPORTE_TOTALIsNull : Boolean read GetOldIMPORTE_TOTALIsNull; property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull; property ID_PROVEEDOR : Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue; property ID_PROVEEDORIsNull : Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull; property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue; property OldID_PROVEEDORIsNull : Boolean read GetOldID_PROVEEDORIsNull; property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue; property NOMBRE_PROVEEDORIsNull : Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull; property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue; property OldNOMBRE_PROVEEDORIsNull : Boolean read GetOldNOMBRE_PROVEEDORIsNull; property NOMBRE_COMERCIAL : String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue; property NOMBRE_COMERCIALIsNull : Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull; property OldNOMBRE_COMERCIAL : String read GetOldNOMBRE_COMERCIALValue; property OldNOMBRE_COMERCIALIsNull : Boolean read GetOldNOMBRE_COMERCIALIsNull; property ENTIDAD_PROVEEDOR : String read GetENTIDAD_PROVEEDORValue write SetENTIDAD_PROVEEDORValue; property ENTIDAD_PROVEEDORIsNull : Boolean read GetENTIDAD_PROVEEDORIsNull write SetENTIDAD_PROVEEDORIsNull; property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue; property OldENTIDAD_PROVEEDORIsNull : Boolean read GetOldENTIDAD_PROVEEDORIsNull; property SUCURSAL_PROVEEDOR : String read GetSUCURSAL_PROVEEDORValue write SetSUCURSAL_PROVEEDORValue; property SUCURSAL_PROVEEDORIsNull : Boolean read GetSUCURSAL_PROVEEDORIsNull write SetSUCURSAL_PROVEEDORIsNull; property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue; property OldSUCURSAL_PROVEEDORIsNull : Boolean read GetOldSUCURSAL_PROVEEDORIsNull; property DC_PROVEEDOR : String read GetDC_PROVEEDORValue write SetDC_PROVEEDORValue; property DC_PROVEEDORIsNull : Boolean read GetDC_PROVEEDORIsNull write SetDC_PROVEEDORIsNull; property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue; property OldDC_PROVEEDORIsNull : Boolean read GetOldDC_PROVEEDORIsNull; property CUENTA_PROVEEDOR : String read GetCUENTA_PROVEEDORValue write SetCUENTA_PROVEEDORValue; property CUENTA_PROVEEDORIsNull : Boolean read GetCUENTA_PROVEEDORIsNull write SetCUENTA_PROVEEDORIsNull; property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue; property OldCUENTA_PROVEEDORIsNull : Boolean read GetOldCUENTA_PROVEEDORIsNull; property NIF_CIF : String read GetNIF_CIFValue write SetNIF_CIFValue; property NIF_CIFIsNull : Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull; property OldNIF_CIF : String read GetOldNIF_CIFValue; property OldNIF_CIFIsNull : Boolean read GetOldNIF_CIFIsNull; property NOMBRE : String read GetNOMBREValue write SetNOMBREValue; property NOMBREIsNull : Boolean read GetNOMBREIsNull write SetNOMBREIsNull; property OldNOMBRE : String read GetOldNOMBREValue; property OldNOMBREIsNull : Boolean read GetOldNOMBREIsNull; property CALLE : String read GetCALLEValue write SetCALLEValue; property CALLEIsNull : Boolean read GetCALLEIsNull write SetCALLEIsNull; property OldCALLE : String read GetOldCALLEValue; property OldCALLEIsNull : Boolean read GetOldCALLEIsNull; property POBLACION : String read GetPOBLACIONValue write SetPOBLACIONValue; property POBLACIONIsNull : Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull; property OldPOBLACION : String read GetOldPOBLACIONValue; property OldPOBLACIONIsNull : Boolean read GetOldPOBLACIONIsNull; property CODIGO_POSTAL : String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue; property CODIGO_POSTALIsNull : Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull; property OldCODIGO_POSTAL : String read GetOldCODIGO_POSTALValue; property OldCODIGO_POSTALIsNull : Boolean read GetOldCODIGO_POSTALIsNull; property PROVINCIA : String read GetPROVINCIAValue write SetPROVINCIAValue; property PROVINCIAIsNull : Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull; property OldPROVINCIA : String read GetOldPROVINCIAValue; property OldPROVINCIAIsNull : Boolean read GetOldPROVINCIAIsNull; property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue; property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull; property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue; property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull; property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue; property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull; property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue; property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull; property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue; property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull; property OldUSUARIO : String read GetOldUSUARIOValue; property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull; property ID_TIENDA : Integer read GetID_TIENDAValue write SetID_TIENDAValue; property ID_TIENDAIsNull : Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull; property OldID_TIENDA : Integer read GetOldID_TIENDAValue; property OldID_TIENDAIsNull : Boolean read GetOldID_TIENDAIsNull; property TIENDA : String read GetTIENDAValue write SetTIENDAValue; property TIENDAIsNull : Boolean read GetTIENDAIsNull write SetTIENDAIsNull; property OldTIENDA : String read GetOldTIENDAValue; property OldTIENDAIsNull : Boolean read GetOldTIENDAIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; destructor Destroy; override; end; { IRecibosProveedorDelta } IRecibosProveedorDelta = interface(IRecibosProveedor) ['{41AE7B3A-2837-467C-9EF5-EE52952DC66E}'] { 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 GetOldREFERENCIA_FACTURA_PROVValue : String; function GetOldFECHA_FACTURAValue : DateTime; function GetOldFORMA_PAGO_FACTURAValue : String; function GetOldIMPORTE_FACTURAValue : Currency; 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 GetOldID_EMPRESAValue : Integer; function GetOldID_PROVEEDORValue : Integer; function GetOldNOMBRE_PROVEEDORValue : String; function GetOldNOMBRE_COMERCIALValue : String; function GetOldENTIDAD_PROVEEDORValue : String; function GetOldSUCURSAL_PROVEEDORValue : String; function GetOldDC_PROVEEDORValue : String; function GetOldCUENTA_PROVEEDORValue : String; function GetOldNIF_CIFValue : String; function GetOldNOMBREValue : String; function GetOldCALLEValue : String; function GetOldPOBLACIONValue : String; function GetOldCODIGO_POSTALValue : String; function GetOldPROVINCIAValue : String; function GetOldFECHA_ALTAValue : DateTime; function GetOldFECHA_MODIFICACIONValue : DateTime; function GetOldUSUARIOValue : String; function GetOldID_TIENDAValue : Integer; function GetOldTIENDAValue : String; function GetOldFECHA_PAGOValue : DateTime; function GetOldSUBCUENTAValue : 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 OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue; property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue; property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue; property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue; property OldID_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 OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue; property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue; property OldNOMBRE_COMERCIAL : String read GetOldNOMBRE_COMERCIALValue; 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 OldNIF_CIF : String read GetOldNIF_CIFValue; property OldNOMBRE : String read GetOldNOMBREValue; property OldCALLE : String read GetOldCALLEValue; property OldPOBLACION : String read GetOldPOBLACIONValue; property OldCODIGO_POSTAL : String read GetOldCODIGO_POSTALValue; property OldPROVINCIA : String read GetOldPROVINCIAValue; property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue; property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue; property OldUSUARIO : String read GetOldUSUARIOValue; property OldID_TIENDA : Integer read GetOldID_TIENDAValue; property OldTIENDA : String read GetOldTIENDAValue; property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue; property OldSUBCUENTA : String read GetOldSUBCUENTAValue; end; { TRecibosProveedorBusinessProcessorRules } TRecibosProveedorBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosProveedor, IRecibosProveedorDelta) private protected { Property getters and setters } function GetIDValue: Integer; virtual; function GetIDIsNull: Boolean; virtual; function GetOldIDValue: Integer; virtual; function GetOldIDIsNull: Boolean; virtual; procedure SetIDValue(const aValue: Integer); virtual; procedure SetIDIsNull(const aValue: Boolean); virtual; function GetID_RECIBO_COMPENSADOValue: Integer; virtual; function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual; function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual; function GetOldID_RECIBO_COMPENSADOIsNull: Boolean; virtual; procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual; procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_REC_COMPENSADOValue: String; virtual; function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual; function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual; function GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual; procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual; procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); virtual; function GetREFERENCIAValue: String; virtual; function GetREFERENCIAIsNull: Boolean; virtual; function GetOldREFERENCIAValue: String; virtual; function GetOldREFERENCIAIsNull: Boolean; virtual; procedure SetREFERENCIAValue(const aValue: String); virtual; procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_PROVEEDORValue: String; virtual; function GetREFERENCIA_PROVEEDORIsNull: Boolean; virtual; function GetOldREFERENCIA_PROVEEDORValue: String; virtual; function GetOldREFERENCIA_PROVEEDORIsNull: Boolean; virtual; procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual; procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetSITUACIONValue: String; virtual; function GetSITUACIONIsNull: Boolean; virtual; function GetOldSITUACIONValue: String; virtual; function GetOldSITUACIONIsNull: Boolean; virtual; procedure SetSITUACIONValue(const aValue: String); virtual; procedure SetSITUACIONIsNull(const aValue: Boolean); virtual; function GetID_FACTURAValue: Integer; virtual; function GetID_FACTURAIsNull: Boolean; virtual; function GetOldID_FACTURAValue: Integer; virtual; function GetOldID_FACTURAIsNull: Boolean; virtual; procedure SetID_FACTURAValue(const aValue: Integer); virtual; procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_FACTURA_PROVValue: String; virtual; function GetREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual; function GetOldREFERENCIA_FACTURA_PROVValue: String; virtual; function GetOldREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual; procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual; procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); virtual; function GetFECHA_FACTURAValue: DateTime; virtual; function GetFECHA_FACTURAIsNull: Boolean; virtual; function GetOldFECHA_FACTURAValue: DateTime; virtual; function GetOldFECHA_FACTURAIsNull: Boolean; virtual; procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual; procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual; function GetFORMA_PAGO_FACTURAValue: String; virtual; function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual; function GetOldFORMA_PAGO_FACTURAValue: String; virtual; function GetOldFORMA_PAGO_FACTURAIsNull: Boolean; virtual; procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual; procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual; function GetIMPORTE_FACTURAValue: Currency; virtual; function GetIMPORTE_FACTURAIsNull: Boolean; virtual; function GetOldIMPORTE_FACTURAValue: Currency; virtual; function GetOldIMPORTE_FACTURAIsNull: Boolean; virtual; procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual; procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean); virtual; function GetID_REMESAValue: Integer; virtual; function GetID_REMESAIsNull: Boolean; virtual; function GetOldID_REMESAValue: Integer; virtual; function GetOldID_REMESAIsNull: Boolean; virtual; procedure SetID_REMESAValue(const aValue: Integer); virtual; procedure SetID_REMESAIsNull(const aValue: Boolean); virtual; function GetREFERENCIA_REMESAValue: String; virtual; function GetREFERENCIA_REMESAIsNull: Boolean; virtual; function GetOldREFERENCIA_REMESAValue: String; virtual; function GetOldREFERENCIA_REMESAIsNull: Boolean; virtual; procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual; procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual; function GetFECHA_EMISIONValue: DateTime; virtual; function GetFECHA_EMISIONIsNull: Boolean; virtual; function GetOldFECHA_EMISIONValue: DateTime; virtual; function GetOldFECHA_EMISIONIsNull: Boolean; virtual; procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual; procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual; function GetFECHA_VENCIMIENTOValue: DateTime; virtual; function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual; function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual; function GetOldFECHA_VENCIMIENTOIsNull: Boolean; virtual; procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual; procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; function GetOldDESCRIPCIONValue: String; virtual; function GetOldDESCRIPCIONIsNull: Boolean; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; function GetOBSERVACIONESValue: String; virtual; function GetOBSERVACIONESIsNull: Boolean; virtual; function GetOldOBSERVACIONESValue: String; virtual; function GetOldOBSERVACIONESIsNull: Boolean; virtual; procedure SetOBSERVACIONESValue(const aValue: String); virtual; procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual; function GetIMPORTEValue: Currency; virtual; function GetIMPORTEIsNull: Boolean; virtual; function GetOldIMPORTEValue: Currency; virtual; function GetOldIMPORTEIsNull: Boolean; virtual; procedure SetIMPORTEValue(const aValue: Currency); virtual; procedure SetIMPORTEIsNull(const aValue: Boolean); virtual; function GetOTROS_GASTOSValue: Currency; virtual; function GetOTROS_GASTOSIsNull: Boolean; virtual; function GetOldOTROS_GASTOSValue: Currency; virtual; function GetOldOTROS_GASTOSIsNull: Boolean; virtual; procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual; procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual; function GetIMPORTE_TOTALValue: Currency; virtual; function GetIMPORTE_TOTALIsNull: Boolean; virtual; function GetOldIMPORTE_TOTALValue: Currency; virtual; function GetOldIMPORTE_TOTALIsNull: Boolean; virtual; procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual; procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual; function GetID_EMPRESAValue: Integer; virtual; function GetID_EMPRESAIsNull: Boolean; virtual; function GetOldID_EMPRESAValue: Integer; virtual; function GetOldID_EMPRESAIsNull: Boolean; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual; function GetID_PROVEEDORValue: Integer; virtual; function GetID_PROVEEDORIsNull: Boolean; virtual; function GetOldID_PROVEEDORValue: Integer; virtual; function GetOldID_PROVEEDORIsNull: Boolean; virtual; procedure SetID_PROVEEDORValue(const aValue: Integer); virtual; procedure SetID_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNOMBRE_PROVEEDORValue: String; virtual; function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual; function GetOldNOMBRE_PROVEEDORValue: String; virtual; function GetOldNOMBRE_PROVEEDORIsNull: Boolean; virtual; procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual; procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNOMBRE_COMERCIALValue: String; virtual; function GetNOMBRE_COMERCIALIsNull: Boolean; virtual; function GetOldNOMBRE_COMERCIALValue: String; virtual; function GetOldNOMBRE_COMERCIALIsNull: Boolean; virtual; procedure SetNOMBRE_COMERCIALValue(const aValue: String); virtual; procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); virtual; function GetENTIDAD_PROVEEDORValue: String; virtual; function GetENTIDAD_PROVEEDORIsNull: Boolean; virtual; function GetOldENTIDAD_PROVEEDORValue: String; virtual; function GetOldENTIDAD_PROVEEDORIsNull: Boolean; virtual; procedure SetENTIDAD_PROVEEDORValue(const aValue: String); virtual; procedure SetENTIDAD_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetSUCURSAL_PROVEEDORValue: String; virtual; function GetSUCURSAL_PROVEEDORIsNull: Boolean; virtual; function GetOldSUCURSAL_PROVEEDORValue: String; virtual; function GetOldSUCURSAL_PROVEEDORIsNull: Boolean; virtual; procedure SetSUCURSAL_PROVEEDORValue(const aValue: String); virtual; procedure SetSUCURSAL_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetDC_PROVEEDORValue: String; virtual; function GetDC_PROVEEDORIsNull: Boolean; virtual; function GetOldDC_PROVEEDORValue: String; virtual; function GetOldDC_PROVEEDORIsNull: Boolean; virtual; procedure SetDC_PROVEEDORValue(const aValue: String); virtual; procedure SetDC_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetCUENTA_PROVEEDORValue: String; virtual; function GetCUENTA_PROVEEDORIsNull: Boolean; virtual; function GetOldCUENTA_PROVEEDORValue: String; virtual; function GetOldCUENTA_PROVEEDORIsNull: Boolean; virtual; procedure SetCUENTA_PROVEEDORValue(const aValue: String); virtual; procedure SetCUENTA_PROVEEDORIsNull(const aValue: Boolean); virtual; function GetNIF_CIFValue: String; virtual; function GetNIF_CIFIsNull: Boolean; virtual; function GetOldNIF_CIFValue: String; virtual; function GetOldNIF_CIFIsNull: Boolean; virtual; procedure SetNIF_CIFValue(const aValue: String); virtual; procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual; function GetNOMBREValue: String; virtual; function GetNOMBREIsNull: Boolean; virtual; function GetOldNOMBREValue: String; virtual; function GetOldNOMBREIsNull: Boolean; virtual; procedure SetNOMBREValue(const aValue: String); virtual; procedure SetNOMBREIsNull(const aValue: Boolean); virtual; function GetCALLEValue: String; virtual; function GetCALLEIsNull: Boolean; virtual; function GetOldCALLEValue: String; virtual; function GetOldCALLEIsNull: Boolean; virtual; procedure SetCALLEValue(const aValue: String); virtual; procedure SetCALLEIsNull(const aValue: Boolean); virtual; function GetPOBLACIONValue: String; virtual; function GetPOBLACIONIsNull: Boolean; virtual; function GetOldPOBLACIONValue: String; virtual; function GetOldPOBLACIONIsNull: Boolean; virtual; procedure SetPOBLACIONValue(const aValue: String); virtual; procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual; function GetCODIGO_POSTALValue: String; virtual; function GetCODIGO_POSTALIsNull: Boolean; virtual; function GetOldCODIGO_POSTALValue: String; virtual; function GetOldCODIGO_POSTALIsNull: Boolean; virtual; procedure SetCODIGO_POSTALValue(const aValue: String); virtual; procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual; function GetPROVINCIAValue: String; virtual; function GetPROVINCIAIsNull: Boolean; virtual; function GetOldPROVINCIAValue: String; virtual; function GetOldPROVINCIAIsNull: Boolean; virtual; procedure SetPROVINCIAValue(const aValue: String); virtual; procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual; function GetFECHA_ALTAValue: DateTime; virtual; function GetFECHA_ALTAIsNull: Boolean; virtual; function GetOldFECHA_ALTAValue: DateTime; virtual; function GetOldFECHA_ALTAIsNull: Boolean; virtual; procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual; procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual; function GetFECHA_MODIFICACIONValue: DateTime; virtual; function GetFECHA_MODIFICACIONIsNull: Boolean; virtual; function GetOldFECHA_MODIFICACIONValue: DateTime; virtual; function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual; procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual; procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual; function GetUSUARIOValue: String; virtual; function GetUSUARIOIsNull: Boolean; virtual; function GetOldUSUARIOValue: String; virtual; function GetOldUSUARIOIsNull: Boolean; virtual; procedure SetUSUARIOValue(const aValue: String); virtual; procedure SetUSUARIOIsNull(const aValue: Boolean); virtual; function GetID_TIENDAValue: Integer; virtual; function GetID_TIENDAIsNull: Boolean; virtual; function GetOldID_TIENDAValue: Integer; virtual; function GetOldID_TIENDAIsNull: Boolean; virtual; procedure SetID_TIENDAValue(const aValue: Integer); virtual; procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual; function GetTIENDAValue: String; virtual; function GetTIENDAIsNull: Boolean; virtual; function GetOldTIENDAValue: String; virtual; function GetOldTIENDAIsNull: Boolean; virtual; procedure SetTIENDAValue(const aValue: String); virtual; procedure SetTIENDAIsNull(const aValue: Boolean); virtual; function GetFECHA_PAGOValue: DateTime; virtual; function GetFECHA_PAGOIsNull: Boolean; virtual; function GetOldFECHA_PAGOValue: DateTime; virtual; function GetOldFECHA_PAGOIsNull: Boolean; virtual; procedure SetFECHA_PAGOValue(const aValue: DateTime); virtual; procedure SetFECHA_PAGOIsNull(const aValue: Boolean); virtual; function GetSUBCUENTAValue: String; virtual; function GetSUBCUENTAIsNull: Boolean; virtual; function GetOldSUBCUENTAValue: String; virtual; function GetOldSUBCUENTAIsNull: Boolean; virtual; procedure SetSUBCUENTAValue(const aValue: String); virtual; procedure SetSUBCUENTAIsNull(const aValue: Boolean); virtual; { Properties } property ID : Integer read GetIDValue write SetIDValue; property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull; property OldID : Integer read GetOldIDValue; property OldIDIsNull : Boolean read GetOldIDIsNull; property ID_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue; property ID_RECIBO_COMPENSADOIsNull : Boolean read GetID_RECIBO_COMPENSADOIsNull write SetID_RECIBO_COMPENSADOIsNull; property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue; property OldID_RECIBO_COMPENSADOIsNull : Boolean read GetOldID_RECIBO_COMPENSADOIsNull; property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue; property REFERENCIA_REC_COMPENSADOIsNull : Boolean read GetREFERENCIA_REC_COMPENSADOIsNull write SetREFERENCIA_REC_COMPENSADOIsNull; property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue; property OldREFERENCIA_REC_COMPENSADOIsNull : Boolean read GetOldREFERENCIA_REC_COMPENSADOIsNull; property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue; property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; property OldREFERENCIA : String read GetOldREFERENCIAValue; property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull; property REFERENCIA_PROVEEDOR : String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue; property REFERENCIA_PROVEEDORIsNull : Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull; property OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue; property OldREFERENCIA_PROVEEDORIsNull : Boolean read GetOldREFERENCIA_PROVEEDORIsNull; property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue; property SITUACIONIsNull : Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull; property OldSITUACION : String read GetOldSITUACIONValue; property OldSITUACIONIsNull : Boolean read GetOldSITUACIONIsNull; property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue; property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull; property OldID_FACTURA : Integer read GetOldID_FACTURAValue; property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull; property REFERENCIA_FACTURA_PROV : String read GetREFERENCIA_FACTURA_PROVValue write SetREFERENCIA_FACTURA_PROVValue; property REFERENCIA_FACTURA_PROVIsNull : Boolean read GetREFERENCIA_FACTURA_PROVIsNull write SetREFERENCIA_FACTURA_PROVIsNull; property OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue; property OldREFERENCIA_FACTURA_PROVIsNull : Boolean read GetOldREFERENCIA_FACTURA_PROVIsNull; property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue; property FECHA_FACTURAIsNull : Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull; property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue; property OldFECHA_FACTURAIsNull : Boolean read GetOldFECHA_FACTURAIsNull; property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue; property FORMA_PAGO_FACTURAIsNull : Boolean read GetFORMA_PAGO_FACTURAIsNull write SetFORMA_PAGO_FACTURAIsNull; property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue; property OldFORMA_PAGO_FACTURAIsNull : Boolean read GetOldFORMA_PAGO_FACTURAIsNull; property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue; property IMPORTE_FACTURAIsNull : Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull; property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue; property OldIMPORTE_FACTURAIsNull : Boolean read GetOldIMPORTE_FACTURAIsNull; property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue; property ID_REMESAIsNull : Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull; property OldID_REMESA : Integer read GetOldID_REMESAValue; property OldID_REMESAIsNull : Boolean read GetOldID_REMESAIsNull; property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue; property REFERENCIA_REMESAIsNull : Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull; property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue; property OldREFERENCIA_REMESAIsNull : Boolean read GetOldREFERENCIA_REMESAIsNull; property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue; property FECHA_EMISIONIsNull : Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull; property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue; property OldFECHA_EMISIONIsNull : Boolean read GetOldFECHA_EMISIONIsNull; property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue; property FECHA_VENCIMIENTOIsNull : Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull; property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue; property OldFECHA_VENCIMIENTOIsNull : Boolean read GetOldFECHA_VENCIMIENTOIsNull; property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull; property OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue; property OBSERVACIONESIsNull : Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull; property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue; property OldOBSERVACIONESIsNull : Boolean read GetOldOBSERVACIONESIsNull; property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue; property IMPORTEIsNull : Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull; property OldIMPORTE : Currency read GetOldIMPORTEValue; property OldIMPORTEIsNull : Boolean read GetOldIMPORTEIsNull; property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue; property OTROS_GASTOSIsNull : Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull; property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue; property OldOTROS_GASTOSIsNull : Boolean read GetOldOTROS_GASTOSIsNull; property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue; property IMPORTE_TOTALIsNull : Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull; property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue; property OldIMPORTE_TOTALIsNull : Boolean read GetOldIMPORTE_TOTALIsNull; property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull; property ID_PROVEEDOR : Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue; property ID_PROVEEDORIsNull : Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull; property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue; property OldID_PROVEEDORIsNull : Boolean read GetOldID_PROVEEDORIsNull; property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue; property NOMBRE_PROVEEDORIsNull : Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull; property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue; property OldNOMBRE_PROVEEDORIsNull : Boolean read GetOldNOMBRE_PROVEEDORIsNull; property NOMBRE_COMERCIAL : String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue; property NOMBRE_COMERCIALIsNull : Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull; property OldNOMBRE_COMERCIAL : String read GetOldNOMBRE_COMERCIALValue; property OldNOMBRE_COMERCIALIsNull : Boolean read GetOldNOMBRE_COMERCIALIsNull; property ENTIDAD_PROVEEDOR : String read GetENTIDAD_PROVEEDORValue write SetENTIDAD_PROVEEDORValue; property ENTIDAD_PROVEEDORIsNull : Boolean read GetENTIDAD_PROVEEDORIsNull write SetENTIDAD_PROVEEDORIsNull; property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue; property OldENTIDAD_PROVEEDORIsNull : Boolean read GetOldENTIDAD_PROVEEDORIsNull; property SUCURSAL_PROVEEDOR : String read GetSUCURSAL_PROVEEDORValue write SetSUCURSAL_PROVEEDORValue; property SUCURSAL_PROVEEDORIsNull : Boolean read GetSUCURSAL_PROVEEDORIsNull write SetSUCURSAL_PROVEEDORIsNull; property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue; property OldSUCURSAL_PROVEEDORIsNull : Boolean read GetOldSUCURSAL_PROVEEDORIsNull; property DC_PROVEEDOR : String read GetDC_PROVEEDORValue write SetDC_PROVEEDORValue; property DC_PROVEEDORIsNull : Boolean read GetDC_PROVEEDORIsNull write SetDC_PROVEEDORIsNull; property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue; property OldDC_PROVEEDORIsNull : Boolean read GetOldDC_PROVEEDORIsNull; property CUENTA_PROVEEDOR : String read GetCUENTA_PROVEEDORValue write SetCUENTA_PROVEEDORValue; property CUENTA_PROVEEDORIsNull : Boolean read GetCUENTA_PROVEEDORIsNull write SetCUENTA_PROVEEDORIsNull; property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue; property OldCUENTA_PROVEEDORIsNull : Boolean read GetOldCUENTA_PROVEEDORIsNull; property NIF_CIF : String read GetNIF_CIFValue write SetNIF_CIFValue; property NIF_CIFIsNull : Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull; property OldNIF_CIF : String read GetOldNIF_CIFValue; property OldNIF_CIFIsNull : Boolean read GetOldNIF_CIFIsNull; property NOMBRE : String read GetNOMBREValue write SetNOMBREValue; property NOMBREIsNull : Boolean read GetNOMBREIsNull write SetNOMBREIsNull; property OldNOMBRE : String read GetOldNOMBREValue; property OldNOMBREIsNull : Boolean read GetOldNOMBREIsNull; property CALLE : String read GetCALLEValue write SetCALLEValue; property CALLEIsNull : Boolean read GetCALLEIsNull write SetCALLEIsNull; property OldCALLE : String read GetOldCALLEValue; property OldCALLEIsNull : Boolean read GetOldCALLEIsNull; property POBLACION : String read GetPOBLACIONValue write SetPOBLACIONValue; property POBLACIONIsNull : Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull; property OldPOBLACION : String read GetOldPOBLACIONValue; property OldPOBLACIONIsNull : Boolean read GetOldPOBLACIONIsNull; property CODIGO_POSTAL : String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue; property CODIGO_POSTALIsNull : Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull; property OldCODIGO_POSTAL : String read GetOldCODIGO_POSTALValue; property OldCODIGO_POSTALIsNull : Boolean read GetOldCODIGO_POSTALIsNull; property PROVINCIA : String read GetPROVINCIAValue write SetPROVINCIAValue; property PROVINCIAIsNull : Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull; property OldPROVINCIA : String read GetOldPROVINCIAValue; property OldPROVINCIAIsNull : Boolean read GetOldPROVINCIAIsNull; property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue; property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull; property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue; property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull; property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue; property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull; property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue; property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull; property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue; property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull; property OldUSUARIO : String read GetOldUSUARIOValue; property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull; property ID_TIENDA : Integer read GetID_TIENDAValue write SetID_TIENDAValue; property ID_TIENDAIsNull : Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull; property OldID_TIENDA : Integer read GetOldID_TIENDAValue; property OldID_TIENDAIsNull : Boolean read GetOldID_TIENDAIsNull; property TIENDA : String read GetTIENDAValue write SetTIENDAValue; property TIENDAIsNull : Boolean read GetTIENDAIsNull write SetTIENDAIsNull; property OldTIENDA : String read GetOldTIENDAValue; property OldTIENDAIsNull : Boolean read GetOldTIENDAIsNull; property FECHA_PAGO : DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue; property FECHA_PAGOIsNull : Boolean read GetFECHA_PAGOIsNull write SetFECHA_PAGOIsNull; property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue; property OldFECHA_PAGOIsNull : Boolean read GetOldFECHA_PAGOIsNull; property SUBCUENTA : String read GetSUBCUENTAValue write SetSUBCUENTAValue; property SUBCUENTAIsNull : Boolean read GetSUBCUENTAIsNull write SetSUBCUENTAIsNull; property OldSUBCUENTA : String read GetOldSUBCUENTAValue; property OldSUBCUENTAIsNull : Boolean read GetOldSUBCUENTAIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; destructor Destroy; override; end; { IPagosProveedorDelta } IPagosProveedorDelta = interface(IPagosProveedor) ['{42CA510C-C01E-4C46-A221-CE6EF13D95EA}'] { 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; function GetOldIGNORAR_CONTABILIDADValue : SmallInt; function GetOldID_SUBCUENTAValue : Integer; function GetOldSUBCUENTAValue : String; function GetOldID_EJERCICIOValue : Integer; function GetOldESTADO_EJERCICIOValue : String; function GetOldASIENTO_PUNTEADOValue : SmallInt; { 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; property OldIGNORAR_CONTABILIDAD : SmallInt read GetOldIGNORAR_CONTABILIDADValue; property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue; property OldSUBCUENTA : String read GetOldSUBCUENTAValue; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; property OldESTADO_EJERCICIO : String read GetOldESTADO_EJERCICIOValue; property OldASIENTO_PUNTEADO : SmallInt read GetOldASIENTO_PUNTEADOValue; end; { TPagosProveedorBusinessProcessorRules } TPagosProveedorBusinessProcessorRules = class(TDABusinessProcessorRules, IPagosProveedor, IPagosProveedorDelta) private protected { Property getters and setters } function GetIDValue: Integer; virtual; function GetIDIsNull: Boolean; virtual; function GetOldIDValue: Integer; virtual; function GetOldIDIsNull: Boolean; virtual; procedure SetIDValue(const aValue: Integer); virtual; procedure SetIDIsNull(const aValue: Boolean); virtual; function GetID_RECIBOValue: Integer; virtual; function GetID_RECIBOIsNull: Boolean; virtual; function GetOldID_RECIBOValue: Integer; virtual; function GetOldID_RECIBOIsNull: Boolean; virtual; procedure SetID_RECIBOValue(const aValue: Integer); virtual; procedure SetID_RECIBOIsNull(const aValue: Boolean); virtual; function GetTIPOValue: String; virtual; function GetTIPOIsNull: Boolean; virtual; function GetOldTIPOValue: String; virtual; function GetOldTIPOIsNull: Boolean; virtual; procedure SetTIPOValue(const aValue: String); virtual; procedure SetTIPOIsNull(const aValue: Boolean); virtual; function GetFECHA_PAGOValue: DateTime; virtual; function GetFECHA_PAGOIsNull: Boolean; virtual; function GetOldFECHA_PAGOValue: DateTime; virtual; function GetOldFECHA_PAGOIsNull: Boolean; virtual; procedure SetFECHA_PAGOValue(const aValue: DateTime); virtual; procedure SetFECHA_PAGOIsNull(const aValue: Boolean); virtual; function GetTITULARValue: String; virtual; function GetTITULARIsNull: Boolean; virtual; function GetOldTITULARValue: String; virtual; function GetOldTITULARIsNull: Boolean; virtual; procedure SetTITULARValue(const aValue: String); virtual; procedure SetTITULARIsNull(const aValue: Boolean); virtual; function GetENTIDADValue: String; virtual; function GetENTIDADIsNull: Boolean; virtual; function GetOldENTIDADValue: String; virtual; function GetOldENTIDADIsNull: Boolean; virtual; procedure SetENTIDADValue(const aValue: String); virtual; procedure SetENTIDADIsNull(const aValue: Boolean); virtual; function GetSUCURSALValue: String; virtual; function GetSUCURSALIsNull: Boolean; virtual; function GetOldSUCURSALValue: String; virtual; function GetOldSUCURSALIsNull: Boolean; virtual; procedure SetSUCURSALValue(const aValue: String); virtual; procedure SetSUCURSALIsNull(const aValue: Boolean); virtual; function GetDCValue: String; virtual; function GetDCIsNull: Boolean; virtual; function GetOldDCValue: String; virtual; function GetOldDCIsNull: Boolean; virtual; procedure SetDCValue(const aValue: String); virtual; procedure SetDCIsNull(const aValue: Boolean); virtual; function GetCUENTAValue: String; virtual; function GetCUENTAIsNull: Boolean; virtual; function GetOldCUENTAValue: String; virtual; function GetOldCUENTAIsNull: Boolean; virtual; procedure SetCUENTAValue(const aValue: String); virtual; procedure SetCUENTAIsNull(const aValue: Boolean); virtual; function GetFECHA_ALTAValue: DateTime; virtual; function GetFECHA_ALTAIsNull: Boolean; virtual; function GetOldFECHA_ALTAValue: DateTime; virtual; function GetOldFECHA_ALTAIsNull: Boolean; virtual; procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual; procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual; function GetFECHA_MODIFICACIONValue: DateTime; virtual; function GetFECHA_MODIFICACIONIsNull: Boolean; virtual; function GetOldFECHA_MODIFICACIONValue: DateTime; virtual; function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual; procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual; procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual; function GetUSUARIOValue: String; virtual; function GetUSUARIOIsNull: Boolean; virtual; function GetOldUSUARIOValue: String; virtual; function GetOldUSUARIOIsNull: Boolean; virtual; procedure SetUSUARIOValue(const aValue: String); virtual; procedure SetUSUARIOIsNull(const aValue: Boolean); virtual; function GetIGNORAR_CONTABILIDADValue: SmallInt; virtual; function GetIGNORAR_CONTABILIDADIsNull: Boolean; virtual; function GetOldIGNORAR_CONTABILIDADValue: SmallInt; virtual; function GetOldIGNORAR_CONTABILIDADIsNull: Boolean; virtual; procedure SetIGNORAR_CONTABILIDADValue(const aValue: SmallInt); virtual; procedure SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean); virtual; function GetID_SUBCUENTAValue: Integer; virtual; function GetID_SUBCUENTAIsNull: Boolean; virtual; function GetOldID_SUBCUENTAValue: Integer; virtual; function GetOldID_SUBCUENTAIsNull: Boolean; virtual; procedure SetID_SUBCUENTAValue(const aValue: Integer); virtual; procedure SetID_SUBCUENTAIsNull(const aValue: Boolean); virtual; function GetSUBCUENTAValue: String; virtual; function GetSUBCUENTAIsNull: Boolean; virtual; function GetOldSUBCUENTAValue: String; virtual; function GetOldSUBCUENTAIsNull: Boolean; virtual; procedure SetSUBCUENTAValue(const aValue: String); virtual; procedure SetSUBCUENTAIsNull(const aValue: Boolean); virtual; function GetID_EJERCICIOValue: Integer; virtual; function GetID_EJERCICIOIsNull: Boolean; virtual; function GetOldID_EJERCICIOValue: Integer; virtual; function GetOldID_EJERCICIOIsNull: Boolean; virtual; procedure SetID_EJERCICIOValue(const aValue: Integer); virtual; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual; function GetESTADO_EJERCICIOValue: String; virtual; function GetESTADO_EJERCICIOIsNull: Boolean; virtual; function GetOldESTADO_EJERCICIOValue: String; virtual; function GetOldESTADO_EJERCICIOIsNull: Boolean; virtual; procedure SetESTADO_EJERCICIOValue(const aValue: String); virtual; procedure SetESTADO_EJERCICIOIsNull(const aValue: Boolean); virtual; function GetASIENTO_PUNTEADOValue: SmallInt; virtual; function GetASIENTO_PUNTEADOIsNull: Boolean; virtual; function GetOldASIENTO_PUNTEADOValue: SmallInt; virtual; function GetOldASIENTO_PUNTEADOIsNull: Boolean; virtual; procedure SetASIENTO_PUNTEADOValue(const aValue: SmallInt); virtual; procedure SetASIENTO_PUNTEADOIsNull(const aValue: Boolean); virtual; { Properties } property ID : Integer read GetIDValue write SetIDValue; property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull; property OldID : Integer read GetOldIDValue; property OldIDIsNull : Boolean read GetOldIDIsNull; property ID_RECIBO : Integer read GetID_RECIBOValue write SetID_RECIBOValue; property ID_RECIBOIsNull : Boolean read GetID_RECIBOIsNull write SetID_RECIBOIsNull; property OldID_RECIBO : Integer read GetOldID_RECIBOValue; property OldID_RECIBOIsNull : Boolean read GetOldID_RECIBOIsNull; property TIPO : String read GetTIPOValue write SetTIPOValue; property TIPOIsNull : Boolean read GetTIPOIsNull write SetTIPOIsNull; property OldTIPO : String read GetOldTIPOValue; property OldTIPOIsNull : Boolean read GetOldTIPOIsNull; property FECHA_PAGO : DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue; property FECHA_PAGOIsNull : Boolean read GetFECHA_PAGOIsNull write SetFECHA_PAGOIsNull; property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue; property OldFECHA_PAGOIsNull : Boolean read GetOldFECHA_PAGOIsNull; property TITULAR : String read GetTITULARValue write SetTITULARValue; property TITULARIsNull : Boolean read GetTITULARIsNull write SetTITULARIsNull; property OldTITULAR : String read GetOldTITULARValue; property OldTITULARIsNull : Boolean read GetOldTITULARIsNull; property ENTIDAD : String read GetENTIDADValue write SetENTIDADValue; property ENTIDADIsNull : Boolean read GetENTIDADIsNull write SetENTIDADIsNull; property OldENTIDAD : String read GetOldENTIDADValue; property OldENTIDADIsNull : Boolean read GetOldENTIDADIsNull; property SUCURSAL : String read GetSUCURSALValue write SetSUCURSALValue; property SUCURSALIsNull : Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull; property OldSUCURSAL : String read GetOldSUCURSALValue; property OldSUCURSALIsNull : Boolean read GetOldSUCURSALIsNull; property DC : String read GetDCValue write SetDCValue; property DCIsNull : Boolean read GetDCIsNull write SetDCIsNull; property OldDC : String read GetOldDCValue; property OldDCIsNull : Boolean read GetOldDCIsNull; property CUENTA : String read GetCUENTAValue write SetCUENTAValue; property CUENTAIsNull : Boolean read GetCUENTAIsNull write SetCUENTAIsNull; property OldCUENTA : String read GetOldCUENTAValue; property OldCUENTAIsNull : Boolean read GetOldCUENTAIsNull; property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue; property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull; property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue; property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull; property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue; property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull; property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue; property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull; property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue; property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull; property OldUSUARIO : String read GetOldUSUARIOValue; property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull; property IGNORAR_CONTABILIDAD : SmallInt read GetIGNORAR_CONTABILIDADValue write SetIGNORAR_CONTABILIDADValue; property IGNORAR_CONTABILIDADIsNull : Boolean read GetIGNORAR_CONTABILIDADIsNull write SetIGNORAR_CONTABILIDADIsNull; property OldIGNORAR_CONTABILIDAD : SmallInt read GetOldIGNORAR_CONTABILIDADValue; property OldIGNORAR_CONTABILIDADIsNull : Boolean read GetOldIGNORAR_CONTABILIDADIsNull; property ID_SUBCUENTA : Integer read GetID_SUBCUENTAValue write SetID_SUBCUENTAValue; property ID_SUBCUENTAIsNull : Boolean read GetID_SUBCUENTAIsNull write SetID_SUBCUENTAIsNull; property OldID_SUBCUENTA : Integer read GetOldID_SUBCUENTAValue; property OldID_SUBCUENTAIsNull : Boolean read GetOldID_SUBCUENTAIsNull; property SUBCUENTA : String read GetSUBCUENTAValue write SetSUBCUENTAValue; property SUBCUENTAIsNull : Boolean read GetSUBCUENTAIsNull write SetSUBCUENTAIsNull; property OldSUBCUENTA : String read GetOldSUBCUENTAValue; property OldSUBCUENTAIsNull : Boolean read GetOldSUBCUENTAIsNull; property ID_EJERCICIO : Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue; property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull; property ESTADO_EJERCICIO : String read GetESTADO_EJERCICIOValue write SetESTADO_EJERCICIOValue; property ESTADO_EJERCICIOIsNull : Boolean read GetESTADO_EJERCICIOIsNull write SetESTADO_EJERCICIOIsNull; property OldESTADO_EJERCICIO : String read GetOldESTADO_EJERCICIOValue; property OldESTADO_EJERCICIOIsNull : Boolean read GetOldESTADO_EJERCICIOIsNull; property ASIENTO_PUNTEADO : SmallInt read GetASIENTO_PUNTEADOValue write SetASIENTO_PUNTEADOValue; property ASIENTO_PUNTEADOIsNull : Boolean read GetASIENTO_PUNTEADOIsNull write SetASIENTO_PUNTEADOIsNull; property OldASIENTO_PUNTEADO : SmallInt read GetOldASIENTO_PUNTEADOValue; property OldASIENTO_PUNTEADOIsNull : Boolean read GetOldASIENTO_PUNTEADOIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; destructor Destroy; override; end; implementation uses Variants, uROBinaryHelpers, uDAInterfaces; { TListaAnosRecibosBusinessProcessorRules } constructor TListaAnosRecibosBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor); begin inherited; end; destructor TListaAnosRecibosBusinessProcessorRules.Destroy; begin inherited; end; function TListaAnosRecibosBusinessProcessorRules.GetANOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO]; end; function TListaAnosRecibosBusinessProcessorRules.GetANOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO]); end; function TListaAnosRecibosBusinessProcessorRules.GetOldANOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_ListaAnosRecibosANO]; end; function TListaAnosRecibosBusinessProcessorRules.GetOldANOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ListaAnosRecibosANO]); end; procedure TListaAnosRecibosBusinessProcessorRules.SetANOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO] := aValue; end; procedure TListaAnosRecibosBusinessProcessorRules.SetANOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO] := Null; end; { 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.GetIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIDValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIDValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIDIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_RECIBO_COMPENSADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOIsNull: Boolean; begin result := VarIsNull(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; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetSITUACIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSITUACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetSITUACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSITUACION]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldSITUACIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvSITUACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldSITUACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvSITUACION]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetSITUACIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSITUACION] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetSITUACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSITUACION] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_FACTURAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_FACTURA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_FACTURAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_FACTURA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_FACTURA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_FACTURA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_FACTURA_PROVValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_FACTURA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_FACTURA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_FACTURA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_FACTURA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFORMA_PAGO_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFORMA_PAGO_FACTURAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFORMA_PAGO_FACTURA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_FACTURAValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_REMESAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_REMESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_REMESA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_REMESAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_REMESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_REMESA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_REMESAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_REMESA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_REMESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_REMESA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_REMESAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIA_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIA_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_REMESAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA_REMESA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_EMISION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_EMISIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_EMISION]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_EMISION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_EMISIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_EMISION]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_EMISIONValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_EMISION] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_EMISIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_EMISION] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_VENCIMIENTOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_VENCIMIENTOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetDESCRIPCIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDESCRIPCION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDESCRIPCION]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldDESCRIPCIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvDESCRIPCION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvDESCRIPCION]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDESCRIPCION] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDESCRIPCION] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOBSERVACIONESValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOBSERVACIONES]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOBSERVACIONESIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOBSERVACIONES]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldOBSERVACIONESValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvOBSERVACIONES]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldOBSERVACIONESIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvOBSERVACIONES]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetOBSERVACIONESValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOBSERVACIONES] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetOBSERVACIONESIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOBSERVACIONES] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTEValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTEValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTEValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTEIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOTROS_GASTOSValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOTROS_GASTOSIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvOTROS_GASTOS]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldOTROS_GASTOSIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvOTROS_GASTOS]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetOTROS_GASTOSValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetOTROS_GASTOSIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_TOTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_TOTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_EMPRESAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_EMPRESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_EMPRESA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_EMPRESAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_EMPRESA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_EMPRESA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_EMPRESA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_EMPRESA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_PROVEEDORValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_PROVEEDORValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_PROVEEDORValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBRE_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBRE_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBRE_COMERCIALValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBRE_COMERCIALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBRE_COMERCIALValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBRE_COMERCIALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBRE_COMERCIALValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_COMERCIAL] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetENTIDAD_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetENTIDAD_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldENTIDAD_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldENTIDAD_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetENTIDAD_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetENTIDAD_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvENTIDAD_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetSUCURSAL_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetSUCURSAL_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetSUCURSAL_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetSUCURSAL_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSUCURSAL_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetDC_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetDC_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldDC_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldDC_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetDC_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetDC_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvDC_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCUENTA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCUENTA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCUENTA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCUENTA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCUENTA_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCUENTA_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCUENTA_PROVEEDOR] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNIF_CIFValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNIF_CIFIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNIF_CIFValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNIF_CIF]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNIF_CIFIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNIF_CIF]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNIF_CIFValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNIF_CIFIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBREValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBREIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBREValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBREIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBREValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBREIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCALLEValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCALLE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCALLEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCALLE]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCALLEValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCALLE]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCALLEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCALLE]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCALLEValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCALLE] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCALLEIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCALLE] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetPOBLACIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPOBLACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetPOBLACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPOBLACION]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldPOBLACIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvPOBLACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldPOBLACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvPOBLACION]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetPOBLACIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPOBLACION] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetPOBLACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPOBLACION] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCODIGO_POSTALValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetCODIGO_POSTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCODIGO_POSTALValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldCODIGO_POSTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCODIGO_POSTALValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetCODIGO_POSTALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvCODIGO_POSTAL] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetPROVINCIAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPROVINCIA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetPROVINCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPROVINCIA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldPROVINCIAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvPROVINCIA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldPROVINCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvPROVINCIA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetPROVINCIAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPROVINCIA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetPROVINCIAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvPROVINCIA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_ALTA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_ALTA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_ALTA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_ALTA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_ALTA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_ALTA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_MODIFICACION] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvUSUARIO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvUSUARIO]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvUSUARIO]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvUSUARIO]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetUSUARIOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvUSUARIO] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvUSUARIO] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_TIENDAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_TIENDA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetID_TIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_TIENDA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_TIENDAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_TIENDA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_TIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_TIENDA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_TIENDAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_TIENDA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_TIENDAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_TIENDA] := Null; end; function TRecibosCompensadosProvBusinessProcessorRules.GetTIENDAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvTIENDA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetTIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvTIENDA]); end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldTIENDAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvTIENDA]; end; function TRecibosCompensadosProvBusinessProcessorRules.GetOldTIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvTIENDA]); end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetTIENDAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvTIENDA] := aValue; end; procedure TRecibosCompensadosProvBusinessProcessorRules.SetTIENDAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvTIENDA] := Null; 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.GetIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID]); end; function TRecibosProveedorBusinessProcessorRules.GetOldIDValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID]; end; function TRecibosProveedorBusinessProcessorRules.GetOldIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID]); end; procedure TRecibosProveedorBusinessProcessorRules.SetIDValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetIDIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO]; end; function TRecibosProveedorBusinessProcessorRules.GetID_RECIBO_COMPENSADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOIsNull: Boolean; begin result := VarIsNull(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; procedure TRecibosProveedorBusinessProcessorRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO]; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO]); end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO]; end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; begin result := VarIsNull(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; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA]; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetSITUACIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSITUACION]; end; function TRecibosProveedorBusinessProcessorRules.GetSITUACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSITUACION]); end; function TRecibosProveedorBusinessProcessorRules.GetOldSITUACIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSITUACION]; end; function TRecibosProveedorBusinessProcessorRules.GetOldSITUACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSITUACION]); end; procedure TRecibosProveedorBusinessProcessorRules.SetSITUACIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSITUACION] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetSITUACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSITUACION] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_FACTURAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetID_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_FACTURA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_FACTURAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_FACTURA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_FACTURA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_FACTURA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV]; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV]); end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV]; end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVIsNull: Boolean; begin result := VarIsNull(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; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_FACTURA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_FACTURA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_FACTURA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_FACTURA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetFORMA_PAGO_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAIsNull: Boolean; begin result := VarIsNull(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; procedure TRecibosProveedorBusinessProcessorRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_FACTURA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_FACTURA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_FACTURAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_FACTURA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTE_FACTURAValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_FACTURA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_FACTURA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_REMESAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_REMESA]; end; function TRecibosProveedorBusinessProcessorRules.GetID_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_REMESA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_REMESAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_REMESA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_REMESA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetID_REMESAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_REMESA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetID_REMESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_REMESA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REMESAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REMESA]; end; function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REMESA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_REMESA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REMESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_REMESA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_REMESAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REMESA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REMESA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_EMISION]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_EMISIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_EMISION]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_EMISION]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_EMISIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_EMISION]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_EMISIONValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_EMISION] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_EMISIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_EMISION] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_VENCIMIENTOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_VENCIMIENTOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetDESCRIPCIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDESCRIPCION]; end; function TRecibosProveedorBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDESCRIPCION]); end; function TRecibosProveedorBusinessProcessorRules.GetOldDESCRIPCIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDESCRIPCION]; end; function TRecibosProveedorBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDESCRIPCION]); end; procedure TRecibosProveedorBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDESCRIPCION] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDESCRIPCION] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetOBSERVACIONESValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOBSERVACIONES]; end; function TRecibosProveedorBusinessProcessorRules.GetOBSERVACIONESIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOBSERVACIONES]); end; function TRecibosProveedorBusinessProcessorRules.GetOldOBSERVACIONESValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOBSERVACIONES]; end; function TRecibosProveedorBusinessProcessorRules.GetOldOBSERVACIONESIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOBSERVACIONES]); end; procedure TRecibosProveedorBusinessProcessorRules.SetOBSERVACIONESValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOBSERVACIONES] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetOBSERVACIONESIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOBSERVACIONES] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTEValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE]; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE]); end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTEValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE]; end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE]); end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTEValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTEIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetOTROS_GASTOSValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOTROS_GASTOS]; end; function TRecibosProveedorBusinessProcessorRules.GetOTROS_GASTOSIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOTROS_GASTOS]); end; function TRecibosProveedorBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOTROS_GASTOS]; end; function TRecibosProveedorBusinessProcessorRules.GetOldOTROS_GASTOSIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOTROS_GASTOS]); end; procedure TRecibosProveedorBusinessProcessorRules.SetOTROS_GASTOSValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOTROS_GASTOS] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetOTROS_GASTOSIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOTROS_GASTOS] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_TOTAL]; end; function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_TOTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_TOTAL]); end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_TOTAL]; end; function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_TOTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_TOTAL]); end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Currency); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_TOTAL] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_TOTAL] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_EMPRESAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_EMPRESA]; end; function TRecibosProveedorBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_EMPRESA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_EMPRESAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_EMPRESA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_EMPRESA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_EMPRESA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_EMPRESA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_PROVEEDORValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetID_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_PROVEEDORValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetID_PROVEEDORValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetID_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBRE_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBRE_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBRE_COMERCIALValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL]; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBRE_COMERCIALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL]); end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBRE_COMERCIALValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL]; end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBRE_COMERCIALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL]); end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBRE_COMERCIALValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_COMERCIAL] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetENTIDAD_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetENTIDAD_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldENTIDAD_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldENTIDAD_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetENTIDAD_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetENTIDAD_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetSUCURSAL_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetSUCURSAL_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetSUCURSAL_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetSUCURSAL_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetDC_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetDC_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldDC_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDC_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldDC_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDC_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetDC_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetDC_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetCUENTA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetCUENTA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR]); end; function TRecibosProveedorBusinessProcessorRules.GetOldCUENTA_PROVEEDORValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR]; end; function TRecibosProveedorBusinessProcessorRules.GetOldCUENTA_PROVEEDORIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR]); end; procedure TRecibosProveedorBusinessProcessorRules.SetCUENTA_PROVEEDORValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetCUENTA_PROVEEDORIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetNIF_CIFValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF]; end; function TRecibosProveedorBusinessProcessorRules.GetNIF_CIFIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF]); end; function TRecibosProveedorBusinessProcessorRules.GetOldNIF_CIFValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNIF_CIF]; end; function TRecibosProveedorBusinessProcessorRules.GetOldNIF_CIFIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNIF_CIF]); end; procedure TRecibosProveedorBusinessProcessorRules.SetNIF_CIFValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetNIF_CIFIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBREValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE]; end; function TRecibosProveedorBusinessProcessorRules.GetNOMBREIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE]); end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBREValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE]; end; function TRecibosProveedorBusinessProcessorRules.GetOldNOMBREIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE]); end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBREValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetNOMBREIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetCALLEValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCALLE]; end; function TRecibosProveedorBusinessProcessorRules.GetCALLEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCALLE]); end; function TRecibosProveedorBusinessProcessorRules.GetOldCALLEValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCALLE]; end; function TRecibosProveedorBusinessProcessorRules.GetOldCALLEIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCALLE]); end; procedure TRecibosProveedorBusinessProcessorRules.SetCALLEValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCALLE] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetCALLEIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCALLE] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetPOBLACIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPOBLACION]; end; function TRecibosProveedorBusinessProcessorRules.GetPOBLACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPOBLACION]); end; function TRecibosProveedorBusinessProcessorRules.GetOldPOBLACIONValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorPOBLACION]; end; function TRecibosProveedorBusinessProcessorRules.GetOldPOBLACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorPOBLACION]); end; procedure TRecibosProveedorBusinessProcessorRules.SetPOBLACIONValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPOBLACION] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetPOBLACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPOBLACION] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetCODIGO_POSTALValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCODIGO_POSTAL]; end; function TRecibosProveedorBusinessProcessorRules.GetCODIGO_POSTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCODIGO_POSTAL]); end; function TRecibosProveedorBusinessProcessorRules.GetOldCODIGO_POSTALValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCODIGO_POSTAL]; end; function TRecibosProveedorBusinessProcessorRules.GetOldCODIGO_POSTALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCODIGO_POSTAL]); end; procedure TRecibosProveedorBusinessProcessorRules.SetCODIGO_POSTALValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCODIGO_POSTAL] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetCODIGO_POSTALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCODIGO_POSTAL] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetPROVINCIAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPROVINCIA]; end; function TRecibosProveedorBusinessProcessorRules.GetPROVINCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPROVINCIA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldPROVINCIAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorPROVINCIA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldPROVINCIAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorPROVINCIA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetPROVINCIAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPROVINCIA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetPROVINCIAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorPROVINCIA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_ALTA]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_ALTA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_ALTA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_ALTA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_ALTA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_ALTA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_MODIFICACION]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_MODIFICACION]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_MODIFICACION]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_MODIFICACION]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_MODIFICACION] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_MODIFICACION] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorUSUARIO]; end; function TRecibosProveedorBusinessProcessorRules.GetUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorUSUARIO]); end; function TRecibosProveedorBusinessProcessorRules.GetOldUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorUSUARIO]; end; function TRecibosProveedorBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorUSUARIO]); end; procedure TRecibosProveedorBusinessProcessorRules.SetUSUARIOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorUSUARIO] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorUSUARIO] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetID_TIENDAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_TIENDA]; end; function TRecibosProveedorBusinessProcessorRules.GetID_TIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_TIENDA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldID_TIENDAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_TIENDA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldID_TIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_TIENDA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetID_TIENDAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_TIENDA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetID_TIENDAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_TIENDA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetTIENDAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorTIENDA]; end; function TRecibosProveedorBusinessProcessorRules.GetTIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorTIENDA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldTIENDAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorTIENDA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldTIENDAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorTIENDA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetTIENDAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorTIENDA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetTIENDAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorTIENDA] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_PAGOValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_PAGO]; end; function TRecibosProveedorBusinessProcessorRules.GetFECHA_PAGOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_PAGO]); end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_PAGOValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_PAGO]; end; function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_PAGOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_PAGO]); end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_PAGOValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_PAGO] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetFECHA_PAGOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_PAGO] := Null; end; function TRecibosProveedorBusinessProcessorRules.GetSUBCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUBCUENTA]; end; function TRecibosProveedorBusinessProcessorRules.GetSUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUBCUENTA]); end; function TRecibosProveedorBusinessProcessorRules.GetOldSUBCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSUBCUENTA]; end; function TRecibosProveedorBusinessProcessorRules.GetOldSUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSUBCUENTA]); end; procedure TRecibosProveedorBusinessProcessorRules.SetSUBCUENTAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUBCUENTA] := aValue; end; procedure TRecibosProveedorBusinessProcessorRules.SetSUBCUENTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUBCUENTA] := Null; 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.GetIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID]); end; function TPagosProveedorBusinessProcessorRules.GetOldIDValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID]; end; function TPagosProveedorBusinessProcessorRules.GetOldIDIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID]); end; procedure TPagosProveedorBusinessProcessorRules.SetIDValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetIDIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID] := Null; end; function TPagosProveedorBusinessProcessorRules.GetID_RECIBOValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_RECIBO]; end; function TPagosProveedorBusinessProcessorRules.GetID_RECIBOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_RECIBO]); end; function TPagosProveedorBusinessProcessorRules.GetOldID_RECIBOValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_RECIBO]; end; function TPagosProveedorBusinessProcessorRules.GetOldID_RECIBOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_RECIBO]); end; procedure TPagosProveedorBusinessProcessorRules.SetID_RECIBOValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_RECIBO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetID_RECIBOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_RECIBO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetTIPOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTIPO]; end; function TPagosProveedorBusinessProcessorRules.GetTIPOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTIPO]); end; function TPagosProveedorBusinessProcessorRules.GetOldTIPOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTIPO]; end; function TPagosProveedorBusinessProcessorRules.GetOldTIPOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTIPO]); end; procedure TPagosProveedorBusinessProcessorRules.SetTIPOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTIPO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetTIPOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTIPO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_PAGOValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_PAGO]; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_PAGOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_PAGO]); end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_PAGOValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_PAGO]; end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_PAGOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_PAGO]); end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_PAGOValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_PAGO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_PAGOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_PAGO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetTITULARValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTITULAR]; end; function TPagosProveedorBusinessProcessorRules.GetTITULARIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTITULAR]); end; function TPagosProveedorBusinessProcessorRules.GetOldTITULARValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTITULAR]; end; function TPagosProveedorBusinessProcessorRules.GetOldTITULARIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTITULAR]); end; procedure TPagosProveedorBusinessProcessorRules.SetTITULARValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTITULAR] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetTITULARIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTITULAR] := Null; end; function TPagosProveedorBusinessProcessorRules.GetENTIDADValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorENTIDAD]; end; function TPagosProveedorBusinessProcessorRules.GetENTIDADIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorENTIDAD]); end; function TPagosProveedorBusinessProcessorRules.GetOldENTIDADValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorENTIDAD]; end; function TPagosProveedorBusinessProcessorRules.GetOldENTIDADIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorENTIDAD]); end; procedure TPagosProveedorBusinessProcessorRules.SetENTIDADValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorENTIDAD] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetENTIDADIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorENTIDAD] := Null; end; function TPagosProveedorBusinessProcessorRules.GetSUCURSALValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUCURSAL]; end; function TPagosProveedorBusinessProcessorRules.GetSUCURSALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUCURSAL]); end; function TPagosProveedorBusinessProcessorRules.GetOldSUCURSALValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorSUCURSAL]; end; function TPagosProveedorBusinessProcessorRules.GetOldSUCURSALIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorSUCURSAL]); end; procedure TPagosProveedorBusinessProcessorRules.SetSUCURSALValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUCURSAL] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetSUCURSALIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUCURSAL] := Null; end; function TPagosProveedorBusinessProcessorRules.GetDCValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorDC]; end; function TPagosProveedorBusinessProcessorRules.GetDCIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorDC]); end; function TPagosProveedorBusinessProcessorRules.GetOldDCValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorDC]; end; function TPagosProveedorBusinessProcessorRules.GetOldDCIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorDC]); end; procedure TPagosProveedorBusinessProcessorRules.SetDCValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorDC] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetDCIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorDC] := Null; end; function TPagosProveedorBusinessProcessorRules.GetCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorCUENTA]); end; function TPagosProveedorBusinessProcessorRules.GetOldCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetOldCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorCUENTA]); end; procedure TPagosProveedorBusinessProcessorRules.SetCUENTAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorCUENTA] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetCUENTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorCUENTA] := Null; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_ALTA]; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_ALTA]); end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_ALTA]; end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_ALTA]); end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_ALTA] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_ALTA] := Null; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_MODIFICACION]; end; function TPagosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_MODIFICACION]); end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_MODIFICACION]; end; function TPagosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_MODIFICACION]); end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_MODIFICACION] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_MODIFICACION] := Null; end; function TPagosProveedorBusinessProcessorRules.GetUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorUSUARIO]; end; function TPagosProveedorBusinessProcessorRules.GetUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorUSUARIO]); end; function TPagosProveedorBusinessProcessorRules.GetOldUSUARIOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorUSUARIO]; end; function TPagosProveedorBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorUSUARIO]); end; procedure TPagosProveedorBusinessProcessorRules.SetUSUARIOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorUSUARIO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorUSUARIO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetIGNORAR_CONTABILIDADValue: SmallInt; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD]; end; function TPagosProveedorBusinessProcessorRules.GetIGNORAR_CONTABILIDADIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD]); end; function TPagosProveedorBusinessProcessorRules.GetOldIGNORAR_CONTABILIDADValue: SmallInt; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD]; end; function TPagosProveedorBusinessProcessorRules.GetOldIGNORAR_CONTABILIDADIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD]); end; procedure TPagosProveedorBusinessProcessorRules.SetIGNORAR_CONTABILIDADValue(const aValue: SmallInt); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorIGNORAR_CONTABILIDAD] := Null; end; function TPagosProveedorBusinessProcessorRules.GetID_SUBCUENTAValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_SUBCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetID_SUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_SUBCUENTA]); end; function TPagosProveedorBusinessProcessorRules.GetOldID_SUBCUENTAValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_SUBCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetOldID_SUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_SUBCUENTA]); end; procedure TPagosProveedorBusinessProcessorRules.SetID_SUBCUENTAValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_SUBCUENTA] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetID_SUBCUENTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_SUBCUENTA] := Null; end; function TPagosProveedorBusinessProcessorRules.GetSUBCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUBCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetSUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUBCUENTA]); end; function TPagosProveedorBusinessProcessorRules.GetOldSUBCUENTAValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorSUBCUENTA]; end; function TPagosProveedorBusinessProcessorRules.GetOldSUBCUENTAIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorSUBCUENTA]); end; procedure TPagosProveedorBusinessProcessorRules.SetSUBCUENTAValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUBCUENTA] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetSUBCUENTAIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUBCUENTA] := Null; end; function TPagosProveedorBusinessProcessorRules.GetID_EJERCICIOValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_EJERCICIO]; end; function TPagosProveedorBusinessProcessorRules.GetID_EJERCICIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_EJERCICIO]); end; function TPagosProveedorBusinessProcessorRules.GetOldID_EJERCICIOValue: Integer; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_EJERCICIO]; end; function TPagosProveedorBusinessProcessorRules.GetOldID_EJERCICIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_EJERCICIO]); end; procedure TPagosProveedorBusinessProcessorRules.SetID_EJERCICIOValue(const aValue: Integer); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_EJERCICIO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetID_EJERCICIOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_EJERCICIO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetESTADO_EJERCICIOValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorESTADO_EJERCICIO]; end; function TPagosProveedorBusinessProcessorRules.GetESTADO_EJERCICIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorESTADO_EJERCICIO]); end; function TPagosProveedorBusinessProcessorRules.GetOldESTADO_EJERCICIOValue: String; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorESTADO_EJERCICIO]; end; function TPagosProveedorBusinessProcessorRules.GetOldESTADO_EJERCICIOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorESTADO_EJERCICIO]); end; procedure TPagosProveedorBusinessProcessorRules.SetESTADO_EJERCICIOValue(const aValue: String); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorESTADO_EJERCICIO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetESTADO_EJERCICIOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorESTADO_EJERCICIO] := Null; end; function TPagosProveedorBusinessProcessorRules.GetASIENTO_PUNTEADOValue: SmallInt; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorASIENTO_PUNTEADO]; end; function TPagosProveedorBusinessProcessorRules.GetASIENTO_PUNTEADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorASIENTO_PUNTEADO]); end; function TPagosProveedorBusinessProcessorRules.GetOldASIENTO_PUNTEADOValue: SmallInt; begin result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorASIENTO_PUNTEADO]; end; function TPagosProveedorBusinessProcessorRules.GetOldASIENTO_PUNTEADOIsNull: Boolean; begin result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorASIENTO_PUNTEADO]); end; procedure TPagosProveedorBusinessProcessorRules.SetASIENTO_PUNTEADOValue(const aValue: SmallInt); begin BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorASIENTO_PUNTEADO] := aValue; end; procedure TPagosProveedorBusinessProcessorRules.SetASIENTO_PUNTEADOIsNull(const aValue: Boolean); begin if aValue then BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorASIENTO_PUNTEADO] := Null; end; initialization RegisterBusinessProcessorRules(RID_ListaAnosRecibosDelta, TListaAnosRecibosBusinessProcessorRules); RegisterBusinessProcessorRules(RID_RecibosCompensadosProvDelta, TRecibosCompensadosProvBusinessProcessorRules); RegisterBusinessProcessorRules(RID_RecibosProveedorDelta, TRecibosProveedorBusinessProcessorRules); RegisterBusinessProcessorRules(RID_PagosProveedorDelta, TPagosProveedorBusinessProcessorRules); end.