Tecsitel_FactuGES2/Source/Modulos/Recibos de proveedor/Model/schRecibosProveedorClient_Intf.pas
2014-03-04 16:37:31 +00:00

2641 lines
118 KiB
ObjectPascal

unit schRecibosProveedorClient_Intf;
interface
uses
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
const
{ Data table rules ids
Feel free to change them to something more human readable
but make sure they are unique in the context of your application }
RID_ListaAnosRecibos = '{F3340670-6908-41EB-9A56-A0889A17B0EE}';
RID_RecibosCompensadosProv = '{E3E62EB4-5556-44A8-99C4-013EA2373D58}';
RID_RecibosProveedor = '{643C6FA4-C971-4D12-A1CE-4D1FFF54183B}';
RID_PagosProveedor = '{F6275C5E-F7BE-454A-9113-8AB468D2F7AC}';
{ Data table names }
nme_ListaAnosRecibos = 'ListaAnosRecibos';
nme_RecibosCompensadosProv = 'RecibosCompensadosProv';
nme_RecibosProveedor = 'RecibosProveedor';
nme_PagosProveedor = 'PagosProveedor';
{ ListaAnosRecibos fields }
fld_ListaAnosRecibosANO = 'ANO';
{ ListaAnosRecibos field indexes }
idx_ListaAnosRecibosANO = 0;
{ RecibosCompensadosProv fields }
fld_RecibosCompensadosProvID = 'ID';
fld_RecibosCompensadosProvID_RECIBO_COMPENSADO = 'ID_RECIBO_COMPENSADO';
fld_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO = 'REFERENCIA_REC_COMPENSADO';
fld_RecibosCompensadosProvREFERENCIA = 'REFERENCIA';
fld_RecibosCompensadosProvREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';
fld_RecibosCompensadosProvSITUACION = 'SITUACION';
fld_RecibosCompensadosProvID_FACTURA = 'ID_FACTURA';
fld_RecibosCompensadosProvID_REMESA = 'ID_REMESA';
fld_RecibosCompensadosProvREFERENCIA_REMESA = 'REFERENCIA_REMESA';
fld_RecibosCompensadosProvFECHA_EMISION = 'FECHA_EMISION';
fld_RecibosCompensadosProvFECHA_VENCIMIENTO = 'FECHA_VENCIMIENTO';
fld_RecibosCompensadosProvDESCRIPCION = 'DESCRIPCION';
fld_RecibosCompensadosProvOBSERVACIONES = 'OBSERVACIONES';
fld_RecibosCompensadosProvIMPORTE = 'IMPORTE';
fld_RecibosCompensadosProvOTROS_GASTOS = 'OTROS_GASTOS';
fld_RecibosCompensadosProvIMPORTE_TOTAL = 'IMPORTE_TOTAL';
fld_RecibosCompensadosProvREFERENCIA_FACTURA_PROV = 'REFERENCIA_FACTURA_PROV';
fld_RecibosCompensadosProvFECHA_FACTURA = 'FECHA_FACTURA';
fld_RecibosCompensadosProvFORMA_PAGO_FACTURA = 'FORMA_PAGO_FACTURA';
fld_RecibosCompensadosProvIMPORTE_FACTURA = 'IMPORTE_FACTURA';
fld_RecibosCompensadosProvID_EMPRESA = 'ID_EMPRESA';
fld_RecibosCompensadosProvDATOS_BANCARIOS = 'DATOS_BANCARIOS';
fld_RecibosCompensadosProvID_PROVEEDOR = 'ID_PROVEEDOR';
fld_RecibosCompensadosProvNOMBRE_PROVEEDOR = 'NOMBRE_PROVEEDOR';
fld_RecibosCompensadosProvNIF_CIF_PROVEEDOR = 'NIF_CIF_PROVEEDOR';
fld_RecibosCompensadosProvFECHA_ALTA = 'FECHA_ALTA';
fld_RecibosCompensadosProvFECHA_MODIFICACION = 'FECHA_MODIFICACION';
fld_RecibosCompensadosProvUSUARIO = 'USUARIO';
{ RecibosCompensadosProv field indexes }
idx_RecibosCompensadosProvID = 0;
idx_RecibosCompensadosProvID_RECIBO_COMPENSADO = 1;
idx_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO = 2;
idx_RecibosCompensadosProvREFERENCIA = 3;
idx_RecibosCompensadosProvREFERENCIA_PROVEEDOR = 4;
idx_RecibosCompensadosProvSITUACION = 5;
idx_RecibosCompensadosProvID_FACTURA = 6;
idx_RecibosCompensadosProvID_REMESA = 7;
idx_RecibosCompensadosProvREFERENCIA_REMESA = 8;
idx_RecibosCompensadosProvFECHA_EMISION = 9;
idx_RecibosCompensadosProvFECHA_VENCIMIENTO = 10;
idx_RecibosCompensadosProvDESCRIPCION = 11;
idx_RecibosCompensadosProvOBSERVACIONES = 12;
idx_RecibosCompensadosProvIMPORTE = 13;
idx_RecibosCompensadosProvOTROS_GASTOS = 14;
idx_RecibosCompensadosProvIMPORTE_TOTAL = 15;
idx_RecibosCompensadosProvREFERENCIA_FACTURA_PROV = 16;
idx_RecibosCompensadosProvFECHA_FACTURA = 17;
idx_RecibosCompensadosProvFORMA_PAGO_FACTURA = 18;
idx_RecibosCompensadosProvIMPORTE_FACTURA = 19;
idx_RecibosCompensadosProvID_EMPRESA = 20;
idx_RecibosCompensadosProvDATOS_BANCARIOS = 21;
idx_RecibosCompensadosProvID_PROVEEDOR = 22;
idx_RecibosCompensadosProvNOMBRE_PROVEEDOR = 23;
idx_RecibosCompensadosProvNIF_CIF_PROVEEDOR = 24;
idx_RecibosCompensadosProvFECHA_ALTA = 25;
idx_RecibosCompensadosProvFECHA_MODIFICACION = 26;
idx_RecibosCompensadosProvUSUARIO = 27;
{ RecibosProveedor fields }
fld_RecibosProveedorID = 'ID';
fld_RecibosProveedorID_RECIBO_COMPENSADO = 'ID_RECIBO_COMPENSADO';
fld_RecibosProveedorREFERENCIA_REC_COMPENSADO = 'REFERENCIA_REC_COMPENSADO';
fld_RecibosProveedorREFERENCIA = 'REFERENCIA';
fld_RecibosProveedorREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';
fld_RecibosProveedorSITUACION = 'SITUACION';
fld_RecibosProveedorID_FACTURA = 'ID_FACTURA';
fld_RecibosProveedorID_REMESA = 'ID_REMESA';
fld_RecibosProveedorREFERENCIA_REMESA = 'REFERENCIA_REMESA';
fld_RecibosProveedorFECHA_EMISION = 'FECHA_EMISION';
fld_RecibosProveedorFECHA_VENCIMIENTO = 'FECHA_VENCIMIENTO';
fld_RecibosProveedorDESCRIPCION = 'DESCRIPCION';
fld_RecibosProveedorOBSERVACIONES = 'OBSERVACIONES';
fld_RecibosProveedorIMPORTE = 'IMPORTE';
fld_RecibosProveedorOTROS_GASTOS = 'OTROS_GASTOS';
fld_RecibosProveedorIMPORTE_TOTAL = 'IMPORTE_TOTAL';
fld_RecibosProveedorREFERENCIA_FACTURA_PROV = 'REFERENCIA_FACTURA_PROV';
fld_RecibosProveedorFECHA_FACTURA = 'FECHA_FACTURA';
fld_RecibosProveedorFORMA_PAGO_FACTURA = 'FORMA_PAGO_FACTURA';
fld_RecibosProveedorIMPORTE_FACTURA = 'IMPORTE_FACTURA';
fld_RecibosProveedorID_EMPRESA = 'ID_EMPRESA';
fld_RecibosProveedorDATOS_BANCARIOS_FACTURA = 'DATOS_BANCARIOS_FACTURA';
fld_RecibosProveedorDATOS_BANCARIOS = 'DATOS_BANCARIOS';
fld_RecibosProveedorID_PROVEEDOR = 'ID_PROVEEDOR';
fld_RecibosProveedorNOMBRE_PROVEEDOR = 'NOMBRE_PROVEEDOR';
fld_RecibosProveedorNIF_CIF_PROVEEDOR = 'NIF_CIF_PROVEEDOR';
fld_RecibosProveedorFECHA_ALTA = 'FECHA_ALTA';
fld_RecibosProveedorFECHA_MODIFICACION = 'FECHA_MODIFICACION';
fld_RecibosProveedorUSUARIO = 'USUARIO';
{ RecibosProveedor field indexes }
idx_RecibosProveedorID = 0;
idx_RecibosProveedorID_RECIBO_COMPENSADO = 1;
idx_RecibosProveedorREFERENCIA_REC_COMPENSADO = 2;
idx_RecibosProveedorREFERENCIA = 3;
idx_RecibosProveedorREFERENCIA_PROVEEDOR = 4;
idx_RecibosProveedorSITUACION = 5;
idx_RecibosProveedorID_FACTURA = 6;
idx_RecibosProveedorID_REMESA = 7;
idx_RecibosProveedorREFERENCIA_REMESA = 8;
idx_RecibosProveedorFECHA_EMISION = 9;
idx_RecibosProveedorFECHA_VENCIMIENTO = 10;
idx_RecibosProveedorDESCRIPCION = 11;
idx_RecibosProveedorOBSERVACIONES = 12;
idx_RecibosProveedorIMPORTE = 13;
idx_RecibosProveedorOTROS_GASTOS = 14;
idx_RecibosProveedorIMPORTE_TOTAL = 15;
idx_RecibosProveedorREFERENCIA_FACTURA_PROV = 16;
idx_RecibosProveedorFECHA_FACTURA = 17;
idx_RecibosProveedorFORMA_PAGO_FACTURA = 18;
idx_RecibosProveedorIMPORTE_FACTURA = 19;
idx_RecibosProveedorID_EMPRESA = 20;
idx_RecibosProveedorDATOS_BANCARIOS_FACTURA = 21;
idx_RecibosProveedorDATOS_BANCARIOS = 22;
idx_RecibosProveedorID_PROVEEDOR = 23;
idx_RecibosProveedorNOMBRE_PROVEEDOR = 24;
idx_RecibosProveedorNIF_CIF_PROVEEDOR = 25;
idx_RecibosProveedorFECHA_ALTA = 26;
idx_RecibosProveedorFECHA_MODIFICACION = 27;
idx_RecibosProveedorUSUARIO = 28;
{ PagosProveedor fields }
fld_PagosProveedorID = 'ID';
fld_PagosProveedorID_RECIBO = 'ID_RECIBO';
fld_PagosProveedorTIPO = 'TIPO';
fld_PagosProveedorFECHA_PAGO = 'FECHA_PAGO';
fld_PagosProveedorTITULAR = 'TITULAR';
fld_PagosProveedorENTIDAD = 'ENTIDAD';
fld_PagosProveedorSUCURSAL = 'SUCURSAL';
fld_PagosProveedorDC = 'DC';
fld_PagosProveedorCUENTA = 'CUENTA';
fld_PagosProveedorFECHA_ALTA = 'FECHA_ALTA';
fld_PagosProveedorFECHA_MODIFICACION = 'FECHA_MODIFICACION';
fld_PagosProveedorUSUARIO = 'USUARIO';
{ PagosProveedor field indexes }
idx_PagosProveedorID = 0;
idx_PagosProveedorID_RECIBO = 1;
idx_PagosProveedorTIPO = 2;
idx_PagosProveedorFECHA_PAGO = 3;
idx_PagosProveedorTITULAR = 4;
idx_PagosProveedorENTIDAD = 5;
idx_PagosProveedorSUCURSAL = 6;
idx_PagosProveedorDC = 7;
idx_PagosProveedorCUENTA = 8;
idx_PagosProveedorFECHA_ALTA = 9;
idx_PagosProveedorFECHA_MODIFICACION = 10;
idx_PagosProveedorUSUARIO = 11;
type
{ IListaAnosRecibos }
IListaAnosRecibos = interface(IDAStronglyTypedDataTable)
['{59463B0B-E289-4B8F-A18B-C31E4C76E34B}']
{ Property getters and setters }
function GetANOValue: String;
procedure SetANOValue(const aValue: String);
function GetANOIsNull: Boolean;
procedure SetANOIsNull(const aValue: Boolean);
{ Properties }
property ANO: String read GetANOValue write SetANOValue;
property ANOIsNull: Boolean read GetANOIsNull write SetANOIsNull;
end;
{ TListaAnosRecibosDataTableRules }
TListaAnosRecibosDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosRecibos)
private
protected
{ Property getters and setters }
function GetANOValue: String; virtual;
procedure SetANOValue(const aValue: String); virtual;
function GetANOIsNull: Boolean; virtual;
procedure SetANOIsNull(const aValue: Boolean); virtual;
{ Properties }
property ANO: String read GetANOValue write SetANOValue;
property ANOIsNull: Boolean read GetANOIsNull write SetANOIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
destructor Destroy; override;
end;
{ IRecibosCompensadosProv }
IRecibosCompensadosProv = interface(IDAStronglyTypedDataTable)
['{E5864951-5BE9-4929-A2A9-4CE1B2A23A01}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
function GetIDIsNull: Boolean;
procedure SetIDIsNull(const aValue: Boolean);
function GetID_RECIBO_COMPENSADOValue: Integer;
procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
function GetID_RECIBO_COMPENSADOIsNull: Boolean;
procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
function GetREFERENCIA_REC_COMPENSADOValue: String;
procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean;
procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
function GetREFERENCIAValue: String;
procedure SetREFERENCIAValue(const aValue: String);
function GetREFERENCIAIsNull: Boolean;
procedure SetREFERENCIAIsNull(const aValue: Boolean);
function GetREFERENCIA_PROVEEDORValue: String;
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);
function GetREFERENCIA_PROVEEDORIsNull: Boolean;
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
function GetSITUACIONValue: String;
procedure SetSITUACIONValue(const aValue: String);
function GetSITUACIONIsNull: Boolean;
procedure SetSITUACIONIsNull(const aValue: Boolean);
function GetID_FACTURAValue: Integer;
procedure SetID_FACTURAValue(const aValue: Integer);
function GetID_FACTURAIsNull: Boolean;
procedure SetID_FACTURAIsNull(const aValue: Boolean);
function GetID_REMESAValue: Integer;
procedure SetID_REMESAValue(const aValue: Integer);
function GetID_REMESAIsNull: Boolean;
procedure SetID_REMESAIsNull(const aValue: Boolean);
function GetREFERENCIA_REMESAValue: String;
procedure SetREFERENCIA_REMESAValue(const aValue: String);
function GetREFERENCIA_REMESAIsNull: Boolean;
procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
function GetFECHA_EMISIONValue: DateTime;
procedure SetFECHA_EMISIONValue(const aValue: DateTime);
function GetFECHA_EMISIONIsNull: Boolean;
procedure SetFECHA_EMISIONIsNull(const aValue: Boolean);
function GetFECHA_VENCIMIENTOValue: DateTime;
procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
function GetFECHA_VENCIMIENTOIsNull: Boolean;
procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
function GetDESCRIPCIONValue: String;
procedure SetDESCRIPCIONValue(const aValue: String);
function GetDESCRIPCIONIsNull: Boolean;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
function GetOBSERVACIONESValue: String;
procedure SetOBSERVACIONESValue(const aValue: String);
function GetOBSERVACIONESIsNull: Boolean;
procedure SetOBSERVACIONESIsNull(const aValue: Boolean);
function GetIMPORTEValue: Currency;
procedure SetIMPORTEValue(const aValue: Currency);
function GetIMPORTEIsNull: Boolean;
procedure SetIMPORTEIsNull(const aValue: Boolean);
function GetOTROS_GASTOSValue: Currency;
procedure SetOTROS_GASTOSValue(const aValue: Currency);
function GetOTROS_GASTOSIsNull: Boolean;
procedure SetOTROS_GASTOSIsNull(const aValue: Boolean);
function GetIMPORTE_TOTALValue: Currency;
procedure SetIMPORTE_TOTALValue(const aValue: Currency);
function GetIMPORTE_TOTALIsNull: Boolean;
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean);
function GetREFERENCIA_FACTURA_PROVValue: String;
procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
function GetREFERENCIA_FACTURA_PROVIsNull: Boolean;
procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean);
function GetFECHA_FACTURAValue: DateTime;
procedure SetFECHA_FACTURAValue(const aValue: DateTime);
function GetFECHA_FACTURAIsNull: Boolean;
procedure SetFECHA_FACTURAIsNull(const aValue: Boolean);
function GetFORMA_PAGO_FACTURAValue: String;
procedure SetFORMA_PAGO_FACTURAValue(const aValue: String);
function GetFORMA_PAGO_FACTURAIsNull: Boolean;
procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
function GetIMPORTE_FACTURAValue: Currency;
procedure SetIMPORTE_FACTURAValue(const aValue: Currency);
function GetIMPORTE_FACTURAIsNull: Boolean;
procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
function GetID_EMPRESAValue: Integer;
procedure SetID_EMPRESAValue(const aValue: Integer);
function GetID_EMPRESAIsNull: Boolean;
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
function GetDATOS_BANCARIOSValue: String;
procedure SetDATOS_BANCARIOSValue(const aValue: String);
function GetDATOS_BANCARIOSIsNull: Boolean;
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
function GetID_PROVEEDORValue: Integer;
procedure SetID_PROVEEDORValue(const aValue: Integer);
function GetID_PROVEEDORIsNull: Boolean;
procedure SetID_PROVEEDORIsNull(const aValue: Boolean);
function GetNOMBRE_PROVEEDORValue: String;
procedure SetNOMBRE_PROVEEDORValue(const aValue: String);
function GetNOMBRE_PROVEEDORIsNull: Boolean;
procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
function GetNIF_CIF_PROVEEDORValue: String;
procedure SetNIF_CIF_PROVEEDORValue(const aValue: String);
function GetNIF_CIF_PROVEEDORIsNull: Boolean;
procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
function GetFECHA_ALTAValue: DateTime;
procedure SetFECHA_ALTAValue(const aValue: DateTime);
function GetFECHA_ALTAIsNull: Boolean;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
function GetFECHA_MODIFICACIONValue: DateTime;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
function GetFECHA_MODIFICACIONIsNull: Boolean;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
function GetUSUARIOValue: String;
procedure SetUSUARIOValue(const aValue: String);
function GetUSUARIOIsNull: Boolean;
procedure SetUSUARIOIsNull(const aValue: Boolean);
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
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 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 REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
property ID_REMESA: Integer read GetID_REMESAValue write SetID_REMESAValue;
property ID_REMESAIsNull: Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
property REFERENCIA_REMESA: String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
property REFERENCIA_REMESAIsNull: Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
property FECHA_EMISION: DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
property FECHA_EMISIONIsNull: Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
property FECHA_VENCIMIENTO: DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
property FECHA_VENCIMIENTOIsNull: Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
property OBSERVACIONES: String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
property IMPORTE: Currency read GetIMPORTEValue write SetIMPORTEValue;
property IMPORTEIsNull: Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
property OTROS_GASTOS: Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
property OTROS_GASTOSIsNull: Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
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 FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_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 IMPORTE_FACTURA: Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
property IMPORTE_FACTURAIsNull: Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
end;
{ TRecibosCompensadosProvDataTableRules }
TRecibosCompensadosProvDataTableRules = class(TIntfObjectDADataTableRules, IRecibosCompensadosProv)
private
protected
{ Property getters and setters }
function GetIDValue: Integer; virtual;
procedure SetIDValue(const aValue: Integer); virtual;
function GetIDIsNull: Boolean; virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual;
function GetID_RECIBO_COMPENSADOValue: Integer; virtual;
procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); virtual;
function GetREFERENCIAValue: String; virtual;
procedure SetREFERENCIAValue(const aValue: String); virtual;
function GetREFERENCIAIsNull: Boolean; virtual;
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_PROVEEDORValue: String; virtual;
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;
function GetREFERENCIA_PROVEEDORIsNull: Boolean; virtual;
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetSITUACIONValue: String; virtual;
procedure SetSITUACIONValue(const aValue: String); virtual;
function GetSITUACIONIsNull: Boolean; virtual;
procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
function GetID_FACTURAValue: Integer; virtual;
procedure SetID_FACTURAValue(const aValue: Integer); virtual;
function GetID_FACTURAIsNull: Boolean; virtual;
procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
function GetID_REMESAValue: Integer; virtual;
procedure SetID_REMESAValue(const aValue: Integer); virtual;
function GetID_REMESAIsNull: Boolean; virtual;
procedure SetID_REMESAIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_REMESAValue: String; virtual;
procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
function GetREFERENCIA_REMESAIsNull: Boolean; virtual;
procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual;
function GetFECHA_EMISIONValue: DateTime; virtual;
procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
function GetFECHA_EMISIONIsNull: Boolean; virtual;
procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual;
function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual;
procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); virtual;
function GetDESCRIPCIONValue: String; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
function GetDESCRIPCIONIsNull: Boolean; virtual;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
function GetOBSERVACIONESValue: String; virtual;
procedure SetOBSERVACIONESValue(const aValue: String); virtual;
function GetOBSERVACIONESIsNull: Boolean; virtual;
procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual;
function GetIMPORTEValue: Currency; virtual;
procedure SetIMPORTEValue(const aValue: Currency); virtual;
function GetIMPORTEIsNull: Boolean; virtual;
procedure SetIMPORTEIsNull(const aValue: Boolean); virtual;
function GetOTROS_GASTOSValue: Currency; virtual;
procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
function GetOTROS_GASTOSIsNull: Boolean; virtual;
procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_TOTALValue: Currency; virtual;
procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
function GetIMPORTE_TOTALIsNull: Boolean; virtual;
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_FACTURA_PROVValue: String; virtual;
procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual;
function GetREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual;
procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); virtual;
function GetFECHA_FACTURAValue: DateTime; virtual;
procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
function GetFECHA_FACTURAIsNull: Boolean; virtual;
procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
function GetFORMA_PAGO_FACTURAValue: String; virtual;
procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_FACTURAValue: Currency; virtual;
procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
function GetIMPORTE_FACTURAIsNull: Boolean; virtual;
procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean); virtual;
function GetID_EMPRESAValue: Integer; virtual;
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
function GetID_EMPRESAIsNull: Boolean; virtual;
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
function GetDATOS_BANCARIOSValue: String; virtual;
procedure SetDATOS_BANCARIOSValue(const aValue: String); virtual;
function GetDATOS_BANCARIOSIsNull: Boolean; virtual;
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean); virtual;
function GetID_PROVEEDORValue: Integer; virtual;
procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
function GetID_PROVEEDORIsNull: Boolean; virtual;
procedure SetID_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetNOMBRE_PROVEEDORValue: String; virtual;
procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetNIF_CIF_PROVEEDORValue: String; virtual;
procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetFECHA_ALTAValue: DateTime; virtual;
procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
function GetFECHA_ALTAIsNull: Boolean; virtual;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
function GetFECHA_MODIFICACIONValue: DateTime; virtual;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
function GetUSUARIOValue: String; virtual;
procedure SetUSUARIOValue(const aValue: String); virtual;
function GetUSUARIOIsNull: Boolean; virtual;
procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
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 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 REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
property ID_REMESA: Integer read GetID_REMESAValue write SetID_REMESAValue;
property ID_REMESAIsNull: Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
property REFERENCIA_REMESA: String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
property REFERENCIA_REMESAIsNull: Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
property FECHA_EMISION: DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
property FECHA_EMISIONIsNull: Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
property FECHA_VENCIMIENTO: DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
property FECHA_VENCIMIENTOIsNull: Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
property OBSERVACIONES: String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
property IMPORTE: Currency read GetIMPORTEValue write SetIMPORTEValue;
property IMPORTEIsNull: Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
property OTROS_GASTOS: Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
property OTROS_GASTOSIsNull: Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
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 FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_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 IMPORTE_FACTURA: Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
property IMPORTE_FACTURAIsNull: Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
destructor Destroy; override;
end;
{ IRecibosProveedor }
IRecibosProveedor = interface(IDAStronglyTypedDataTable)
['{B4198E89-9A06-4D57-A05C-BC64EA058528}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
function GetIDIsNull: Boolean;
procedure SetIDIsNull(const aValue: Boolean);
function GetID_RECIBO_COMPENSADOValue: Integer;
procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
function GetID_RECIBO_COMPENSADOIsNull: Boolean;
procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
function GetREFERENCIA_REC_COMPENSADOValue: String;
procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean;
procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
function GetREFERENCIAValue: String;
procedure SetREFERENCIAValue(const aValue: String);
function GetREFERENCIAIsNull: Boolean;
procedure SetREFERENCIAIsNull(const aValue: Boolean);
function GetREFERENCIA_PROVEEDORValue: String;
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);
function GetREFERENCIA_PROVEEDORIsNull: Boolean;
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
function GetSITUACIONValue: String;
procedure SetSITUACIONValue(const aValue: String);
function GetSITUACIONIsNull: Boolean;
procedure SetSITUACIONIsNull(const aValue: Boolean);
function GetID_FACTURAValue: Integer;
procedure SetID_FACTURAValue(const aValue: Integer);
function GetID_FACTURAIsNull: Boolean;
procedure SetID_FACTURAIsNull(const aValue: Boolean);
function GetID_REMESAValue: Integer;
procedure SetID_REMESAValue(const aValue: Integer);
function GetID_REMESAIsNull: Boolean;
procedure SetID_REMESAIsNull(const aValue: Boolean);
function GetREFERENCIA_REMESAValue: String;
procedure SetREFERENCIA_REMESAValue(const aValue: String);
function GetREFERENCIA_REMESAIsNull: Boolean;
procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
function GetFECHA_EMISIONValue: DateTime;
procedure SetFECHA_EMISIONValue(const aValue: DateTime);
function GetFECHA_EMISIONIsNull: Boolean;
procedure SetFECHA_EMISIONIsNull(const aValue: Boolean);
function GetFECHA_VENCIMIENTOValue: DateTime;
procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
function GetFECHA_VENCIMIENTOIsNull: Boolean;
procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
function GetDESCRIPCIONValue: String;
procedure SetDESCRIPCIONValue(const aValue: String);
function GetDESCRIPCIONIsNull: Boolean;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
function GetOBSERVACIONESValue: String;
procedure SetOBSERVACIONESValue(const aValue: String);
function GetOBSERVACIONESIsNull: Boolean;
procedure SetOBSERVACIONESIsNull(const aValue: Boolean);
function GetIMPORTEValue: Currency;
procedure SetIMPORTEValue(const aValue: Currency);
function GetIMPORTEIsNull: Boolean;
procedure SetIMPORTEIsNull(const aValue: Boolean);
function GetOTROS_GASTOSValue: Currency;
procedure SetOTROS_GASTOSValue(const aValue: Currency);
function GetOTROS_GASTOSIsNull: Boolean;
procedure SetOTROS_GASTOSIsNull(const aValue: Boolean);
function GetIMPORTE_TOTALValue: Currency;
procedure SetIMPORTE_TOTALValue(const aValue: Currency);
function GetIMPORTE_TOTALIsNull: Boolean;
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean);
function GetREFERENCIA_FACTURA_PROVValue: String;
procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
function GetREFERENCIA_FACTURA_PROVIsNull: Boolean;
procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean);
function GetFECHA_FACTURAValue: DateTime;
procedure SetFECHA_FACTURAValue(const aValue: DateTime);
function GetFECHA_FACTURAIsNull: Boolean;
procedure SetFECHA_FACTURAIsNull(const aValue: Boolean);
function GetFORMA_PAGO_FACTURAValue: String;
procedure SetFORMA_PAGO_FACTURAValue(const aValue: String);
function GetFORMA_PAGO_FACTURAIsNull: Boolean;
procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
function GetIMPORTE_FACTURAValue: Currency;
procedure SetIMPORTE_FACTURAValue(const aValue: Currency);
function GetIMPORTE_FACTURAIsNull: Boolean;
procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
function GetID_EMPRESAValue: Integer;
procedure SetID_EMPRESAValue(const aValue: Integer);
function GetID_EMPRESAIsNull: Boolean;
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
function GetDATOS_BANCARIOS_FACTURAValue: String;
procedure SetDATOS_BANCARIOS_FACTURAValue(const aValue: String);
function GetDATOS_BANCARIOS_FACTURAIsNull: Boolean;
procedure SetDATOS_BANCARIOS_FACTURAIsNull(const aValue: Boolean);
function GetDATOS_BANCARIOSValue: String;
procedure SetDATOS_BANCARIOSValue(const aValue: String);
function GetDATOS_BANCARIOSIsNull: Boolean;
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
function GetID_PROVEEDORValue: Integer;
procedure SetID_PROVEEDORValue(const aValue: Integer);
function GetID_PROVEEDORIsNull: Boolean;
procedure SetID_PROVEEDORIsNull(const aValue: Boolean);
function GetNOMBRE_PROVEEDORValue: String;
procedure SetNOMBRE_PROVEEDORValue(const aValue: String);
function GetNOMBRE_PROVEEDORIsNull: Boolean;
procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
function GetNIF_CIF_PROVEEDORValue: String;
procedure SetNIF_CIF_PROVEEDORValue(const aValue: String);
function GetNIF_CIF_PROVEEDORIsNull: Boolean;
procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
function GetFECHA_ALTAValue: DateTime;
procedure SetFECHA_ALTAValue(const aValue: DateTime);
function GetFECHA_ALTAIsNull: Boolean;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
function GetFECHA_MODIFICACIONValue: DateTime;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
function GetFECHA_MODIFICACIONIsNull: Boolean;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
function GetUSUARIOValue: String;
procedure SetUSUARIOValue(const aValue: String);
function GetUSUARIOIsNull: Boolean;
procedure SetUSUARIOIsNull(const aValue: Boolean);
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
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 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 REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
property ID_REMESA: Integer read GetID_REMESAValue write SetID_REMESAValue;
property ID_REMESAIsNull: Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
property REFERENCIA_REMESA: String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
property REFERENCIA_REMESAIsNull: Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
property FECHA_EMISION: DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
property FECHA_EMISIONIsNull: Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
property FECHA_VENCIMIENTO: DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
property FECHA_VENCIMIENTOIsNull: Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
property OBSERVACIONES: String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
property IMPORTE: Currency read GetIMPORTEValue write SetIMPORTEValue;
property IMPORTEIsNull: Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
property OTROS_GASTOS: Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
property OTROS_GASTOSIsNull: Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
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 FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_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 IMPORTE_FACTURA: Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
property IMPORTE_FACTURAIsNull: Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property DATOS_BANCARIOS_FACTURA: String read GetDATOS_BANCARIOS_FACTURAValue write SetDATOS_BANCARIOS_FACTURAValue;
property DATOS_BANCARIOS_FACTURAIsNull: Boolean read GetDATOS_BANCARIOS_FACTURAIsNull write SetDATOS_BANCARIOS_FACTURAIsNull;
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
end;
{ TRecibosProveedorDataTableRules }
TRecibosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IRecibosProveedor)
private
protected
{ Property getters and setters }
function GetIDValue: Integer; virtual;
procedure SetIDValue(const aValue: Integer); virtual;
function GetIDIsNull: Boolean; virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual;
function GetID_RECIBO_COMPENSADOValue: Integer; virtual;
procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
procedure SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean); virtual;
function GetREFERENCIAValue: String; virtual;
procedure SetREFERENCIAValue(const aValue: String); virtual;
function GetREFERENCIAIsNull: Boolean; virtual;
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_PROVEEDORValue: String; virtual;
procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;
function GetREFERENCIA_PROVEEDORIsNull: Boolean; virtual;
procedure SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetSITUACIONValue: String; virtual;
procedure SetSITUACIONValue(const aValue: String); virtual;
function GetSITUACIONIsNull: Boolean; virtual;
procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
function GetID_FACTURAValue: Integer; virtual;
procedure SetID_FACTURAValue(const aValue: Integer); virtual;
function GetID_FACTURAIsNull: Boolean; virtual;
procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
function GetID_REMESAValue: Integer; virtual;
procedure SetID_REMESAValue(const aValue: Integer); virtual;
function GetID_REMESAIsNull: Boolean; virtual;
procedure SetID_REMESAIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_REMESAValue: String; virtual;
procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
function GetREFERENCIA_REMESAIsNull: Boolean; virtual;
procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual;
function GetFECHA_EMISIONValue: DateTime; virtual;
procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
function GetFECHA_EMISIONIsNull: Boolean; virtual;
procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual;
function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual;
procedure SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean); virtual;
function GetDESCRIPCIONValue: String; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
function GetDESCRIPCIONIsNull: Boolean; virtual;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
function GetOBSERVACIONESValue: String; virtual;
procedure SetOBSERVACIONESValue(const aValue: String); virtual;
function GetOBSERVACIONESIsNull: Boolean; virtual;
procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual;
function GetIMPORTEValue: Currency; virtual;
procedure SetIMPORTEValue(const aValue: Currency); virtual;
function GetIMPORTEIsNull: Boolean; virtual;
procedure SetIMPORTEIsNull(const aValue: Boolean); virtual;
function GetOTROS_GASTOSValue: Currency; virtual;
procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
function GetOTROS_GASTOSIsNull: Boolean; virtual;
procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_TOTALValue: Currency; virtual;
procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
function GetIMPORTE_TOTALIsNull: Boolean; virtual;
procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_FACTURA_PROVValue: String; virtual;
procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual;
function GetREFERENCIA_FACTURA_PROVIsNull: Boolean; virtual;
procedure SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean); virtual;
function GetFECHA_FACTURAValue: DateTime; virtual;
procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
function GetFECHA_FACTURAIsNull: Boolean; virtual;
procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
function GetFORMA_PAGO_FACTURAValue: String; virtual;
procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_FACTURAValue: Currency; virtual;
procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
function GetIMPORTE_FACTURAIsNull: Boolean; virtual;
procedure SetIMPORTE_FACTURAIsNull(const aValue: Boolean); virtual;
function GetID_EMPRESAValue: Integer; virtual;
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
function GetID_EMPRESAIsNull: Boolean; virtual;
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
function GetDATOS_BANCARIOS_FACTURAValue: String; virtual;
procedure SetDATOS_BANCARIOS_FACTURAValue(const aValue: String); virtual;
function GetDATOS_BANCARIOS_FACTURAIsNull: Boolean; virtual;
procedure SetDATOS_BANCARIOS_FACTURAIsNull(const aValue: Boolean); virtual;
function GetDATOS_BANCARIOSValue: String; virtual;
procedure SetDATOS_BANCARIOSValue(const aValue: String); virtual;
function GetDATOS_BANCARIOSIsNull: Boolean; virtual;
procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean); virtual;
function GetID_PROVEEDORValue: Integer; virtual;
procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
function GetID_PROVEEDORIsNull: Boolean; virtual;
procedure SetID_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetNOMBRE_PROVEEDORValue: String; virtual;
procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
function GetNOMBRE_PROVEEDORIsNull: Boolean; virtual;
procedure SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetNIF_CIF_PROVEEDORValue: String; virtual;
procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
function GetNIF_CIF_PROVEEDORIsNull: Boolean; virtual;
procedure SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean); virtual;
function GetFECHA_ALTAValue: DateTime; virtual;
procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
function GetFECHA_ALTAIsNull: Boolean; virtual;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
function GetFECHA_MODIFICACIONValue: DateTime; virtual;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
function GetUSUARIOValue: String; virtual;
procedure SetUSUARIOValue(const aValue: String); virtual;
function GetUSUARIOIsNull: Boolean; virtual;
procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
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 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 REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
property REFERENCIA_PROVEEDORIsNull: Boolean read GetREFERENCIA_PROVEEDORIsNull write SetREFERENCIA_PROVEEDORIsNull;
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
property ID_FACTURAIsNull: Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
property ID_REMESA: Integer read GetID_REMESAValue write SetID_REMESAValue;
property ID_REMESAIsNull: Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
property REFERENCIA_REMESA: String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
property REFERENCIA_REMESAIsNull: Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
property FECHA_EMISION: DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
property FECHA_EMISIONIsNull: Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
property FECHA_VENCIMIENTO: DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
property FECHA_VENCIMIENTOIsNull: Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
property OBSERVACIONES: String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
property OBSERVACIONESIsNull: Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
property IMPORTE: Currency read GetIMPORTEValue write SetIMPORTEValue;
property IMPORTEIsNull: Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
property OTROS_GASTOS: Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
property OTROS_GASTOSIsNull: Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
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 FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
property FECHA_FACTURAIsNull: Boolean read GetFECHA_FACTURAIsNull write SetFECHA_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 IMPORTE_FACTURA: Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
property IMPORTE_FACTURAIsNull: Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property DATOS_BANCARIOS_FACTURA: String read GetDATOS_BANCARIOS_FACTURAValue write SetDATOS_BANCARIOS_FACTURAValue;
property DATOS_BANCARIOS_FACTURAIsNull: Boolean read GetDATOS_BANCARIOS_FACTURAIsNull write SetDATOS_BANCARIOS_FACTURAIsNull;
property DATOS_BANCARIOS: String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
property DATOS_BANCARIOSIsNull: Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
property NOMBRE_PROVEEDORIsNull: Boolean read GetNOMBRE_PROVEEDORIsNull write SetNOMBRE_PROVEEDORIsNull;
property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
property NIF_CIF_PROVEEDORIsNull: Boolean read GetNIF_CIF_PROVEEDORIsNull write SetNIF_CIF_PROVEEDORIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
destructor Destroy; override;
end;
{ IPagosProveedor }
IPagosProveedor = interface(IDAStronglyTypedDataTable)
['{F3378247-D165-4514-93AF-C95E3EBFA6C7}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
function GetIDIsNull: Boolean;
procedure SetIDIsNull(const aValue: Boolean);
function GetID_RECIBOValue: Integer;
procedure SetID_RECIBOValue(const aValue: Integer);
function GetID_RECIBOIsNull: Boolean;
procedure SetID_RECIBOIsNull(const aValue: Boolean);
function GetTIPOValue: String;
procedure SetTIPOValue(const aValue: String);
function GetTIPOIsNull: Boolean;
procedure SetTIPOIsNull(const aValue: Boolean);
function GetFECHA_PAGOValue: DateTime;
procedure SetFECHA_PAGOValue(const aValue: DateTime);
function GetFECHA_PAGOIsNull: Boolean;
procedure SetFECHA_PAGOIsNull(const aValue: Boolean);
function GetTITULARValue: String;
procedure SetTITULARValue(const aValue: String);
function GetTITULARIsNull: Boolean;
procedure SetTITULARIsNull(const aValue: Boolean);
function GetENTIDADValue: String;
procedure SetENTIDADValue(const aValue: String);
function GetENTIDADIsNull: Boolean;
procedure SetENTIDADIsNull(const aValue: Boolean);
function GetSUCURSALValue: String;
procedure SetSUCURSALValue(const aValue: String);
function GetSUCURSALIsNull: Boolean;
procedure SetSUCURSALIsNull(const aValue: Boolean);
function GetDCValue: String;
procedure SetDCValue(const aValue: String);
function GetDCIsNull: Boolean;
procedure SetDCIsNull(const aValue: Boolean);
function GetCUENTAValue: String;
procedure SetCUENTAValue(const aValue: String);
function GetCUENTAIsNull: Boolean;
procedure SetCUENTAIsNull(const aValue: Boolean);
function GetFECHA_ALTAValue: DateTime;
procedure SetFECHA_ALTAValue(const aValue: DateTime);
function GetFECHA_ALTAIsNull: Boolean;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
function GetFECHA_MODIFICACIONValue: DateTime;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
function GetFECHA_MODIFICACIONIsNull: Boolean;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
function GetUSUARIOValue: String;
procedure SetUSUARIOValue(const aValue: String);
function GetUSUARIOIsNull: Boolean;
procedure SetUSUARIOIsNull(const aValue: Boolean);
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
property ID_RECIBO: Integer read GetID_RECIBOValue write SetID_RECIBOValue;
property ID_RECIBOIsNull: Boolean read GetID_RECIBOIsNull write SetID_RECIBOIsNull;
property TIPO: String read GetTIPOValue write SetTIPOValue;
property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
property FECHA_PAGO: DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue;
property FECHA_PAGOIsNull: Boolean read GetFECHA_PAGOIsNull write SetFECHA_PAGOIsNull;
property TITULAR: String read GetTITULARValue write SetTITULARValue;
property TITULARIsNull: Boolean read GetTITULARIsNull write SetTITULARIsNull;
property ENTIDAD: String read GetENTIDADValue write SetENTIDADValue;
property ENTIDADIsNull: Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
property SUCURSAL: String read GetSUCURSALValue write SetSUCURSALValue;
property SUCURSALIsNull: Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
property DC: String read GetDCValue write SetDCValue;
property DCIsNull: Boolean read GetDCIsNull write SetDCIsNull;
property CUENTA: String read GetCUENTAValue write SetCUENTAValue;
property CUENTAIsNull: Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
end;
{ TPagosProveedorDataTableRules }
TPagosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IPagosProveedor)
private
protected
{ Property getters and setters }
function GetIDValue: Integer; virtual;
procedure SetIDValue(const aValue: Integer); virtual;
function GetIDIsNull: Boolean; virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual;
function GetID_RECIBOValue: Integer; virtual;
procedure SetID_RECIBOValue(const aValue: Integer); virtual;
function GetID_RECIBOIsNull: Boolean; virtual;
procedure SetID_RECIBOIsNull(const aValue: Boolean); virtual;
function GetTIPOValue: String; virtual;
procedure SetTIPOValue(const aValue: String); virtual;
function GetTIPOIsNull: Boolean; virtual;
procedure SetTIPOIsNull(const aValue: Boolean); virtual;
function GetFECHA_PAGOValue: DateTime; virtual;
procedure SetFECHA_PAGOValue(const aValue: DateTime); virtual;
function GetFECHA_PAGOIsNull: Boolean; virtual;
procedure SetFECHA_PAGOIsNull(const aValue: Boolean); virtual;
function GetTITULARValue: String; virtual;
procedure SetTITULARValue(const aValue: String); virtual;
function GetTITULARIsNull: Boolean; virtual;
procedure SetTITULARIsNull(const aValue: Boolean); virtual;
function GetENTIDADValue: String; virtual;
procedure SetENTIDADValue(const aValue: String); virtual;
function GetENTIDADIsNull: Boolean; virtual;
procedure SetENTIDADIsNull(const aValue: Boolean); virtual;
function GetSUCURSALValue: String; virtual;
procedure SetSUCURSALValue(const aValue: String); virtual;
function GetSUCURSALIsNull: Boolean; virtual;
procedure SetSUCURSALIsNull(const aValue: Boolean); virtual;
function GetDCValue: String; virtual;
procedure SetDCValue(const aValue: String); virtual;
function GetDCIsNull: Boolean; virtual;
procedure SetDCIsNull(const aValue: Boolean); virtual;
function GetCUENTAValue: String; virtual;
procedure SetCUENTAValue(const aValue: String); virtual;
function GetCUENTAIsNull: Boolean; virtual;
procedure SetCUENTAIsNull(const aValue: Boolean); virtual;
function GetFECHA_ALTAValue: DateTime; virtual;
procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
function GetFECHA_ALTAIsNull: Boolean; virtual;
procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
function GetFECHA_MODIFICACIONValue: DateTime; virtual;
procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
function GetUSUARIOValue: String; virtual;
procedure SetUSUARIOValue(const aValue: String); virtual;
function GetUSUARIOIsNull: Boolean; virtual;
procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
property ID_RECIBO: Integer read GetID_RECIBOValue write SetID_RECIBOValue;
property ID_RECIBOIsNull: Boolean read GetID_RECIBOIsNull write SetID_RECIBOIsNull;
property TIPO: String read GetTIPOValue write SetTIPOValue;
property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
property FECHA_PAGO: DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue;
property FECHA_PAGOIsNull: Boolean read GetFECHA_PAGOIsNull write SetFECHA_PAGOIsNull;
property TITULAR: String read GetTITULARValue write SetTITULARValue;
property TITULARIsNull: Boolean read GetTITULARIsNull write SetTITULARIsNull;
property ENTIDAD: String read GetENTIDADValue write SetENTIDADValue;
property ENTIDADIsNull: Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
property SUCURSAL: String read GetSUCURSALValue write SetSUCURSALValue;
property SUCURSALIsNull: Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
property DC: String read GetDCValue write SetDCValue;
property DCIsNull: Boolean read GetDCIsNull write SetDCIsNull;
property CUENTA: String read GetCUENTAValue write SetCUENTAValue;
property CUENTAIsNull: Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
destructor Destroy; override;
end;
implementation
uses Variants, uROBinaryHelpers;
{ TListaAnosRecibosDataTableRules }
constructor TListaAnosRecibosDataTableRules.Create(aDataTable: TDADataTable);
begin
inherited;
end;
destructor TListaAnosRecibosDataTableRules.Destroy;
begin
inherited;
end;
function TListaAnosRecibosDataTableRules.GetANOValue: String;
begin
result := DataTable.Fields[idx_ListaAnosRecibosANO].AsString;
end;
procedure TListaAnosRecibosDataTableRules.SetANOValue(const aValue: String);
begin
DataTable.Fields[idx_ListaAnosRecibosANO].AsString := aValue;
end;
function TListaAnosRecibosDataTableRules.GetANOIsNull: boolean;
begin
result := DataTable.Fields[idx_ListaAnosRecibosANO].IsNull;
end;
procedure TListaAnosRecibosDataTableRules.SetANOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_ListaAnosRecibosANO].AsVariant := Null;
end;
{ TRecibosCompensadosProvDataTableRules }
constructor TRecibosCompensadosProvDataTableRules.Create(aDataTable: TDADataTable);
begin
inherited;
end;
destructor TRecibosCompensadosProvDataTableRules.Destroy;
begin
inherited;
end;
function TRecibosCompensadosProvDataTableRules.GetIDValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIDValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetIDIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIDIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_RECIBO_COMPENSADO].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID_RECIBO_COMPENSADO].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetID_RECIBO_COMPENSADOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_RECIBO_COMPENSADO].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID_RECIBO_COMPENSADO].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_REC_COMPENSADOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REC_COMPENSADO].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIAValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_PROVEEDOR].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_PROVEEDOR].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_PROVEEDOR].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_PROVEEDOR].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetSITUACIONValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvSITUACION].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetSITUACIONValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvSITUACION].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetSITUACIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvSITUACION].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetSITUACIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvSITUACION].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetID_FACTURAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_FACTURA].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_FACTURAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID_FACTURA].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetID_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_FACTURA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID_FACTURA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetID_REMESAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_REMESA].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_REMESAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID_REMESA].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetID_REMESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_REMESA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_REMESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID_REMESA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_REMESAValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REMESA].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_REMESAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REMESA].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_REMESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REMESA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_REMESA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_EMISIONValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_EMISION].AsDateTime;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_EMISIONValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosCompensadosProvFECHA_EMISION].AsDateTime := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_EMISIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_EMISION].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_EMISIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFECHA_EMISION].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_VENCIMIENTO].AsDateTime;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosCompensadosProvFECHA_VENCIMIENTO].AsDateTime := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_VENCIMIENTOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_VENCIMIENTO].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFECHA_VENCIMIENTO].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetDESCRIPCIONValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvDESCRIPCION].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvDESCRIPCION].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvDESCRIPCION].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvDESCRIPCION].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetOBSERVACIONESValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvOBSERVACIONES].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetOBSERVACIONESValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvOBSERVACIONES].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetOBSERVACIONESIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvOBSERVACIONES].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetOBSERVACIONESIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvOBSERVACIONES].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTEValue: Currency;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE].AsCurrency;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTEValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE].AsCurrency := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTEIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTEIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetOTROS_GASTOSValue: Currency;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvOTROS_GASTOS].AsCurrency;
end;
procedure TRecibosCompensadosProvDataTableRules.SetOTROS_GASTOSValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosCompensadosProvOTROS_GASTOS].AsCurrency := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetOTROS_GASTOSIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvOTROS_GASTOS].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetOTROS_GASTOSIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvOTROS_GASTOS].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTE_TOTALValue: Currency;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_TOTAL].AsCurrency;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTE_TOTALValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_TOTAL].AsCurrency := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTE_TOTALIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_TOTAL].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_TOTAL].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_FACTURA_PROVValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_FACTURA_PROV].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_FACTURA_PROV].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetREFERENCIA_FACTURA_PROVIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_FACTURA_PROV].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvREFERENCIA_FACTURA_PROV].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_FACTURAValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_FACTURA].AsDateTime;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosCompensadosProvFECHA_FACTURA].AsDateTime := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_FACTURA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFECHA_FACTURA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFORMA_PAGO_FACTURAValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFORMA_PAGO_FACTURA].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFORMA_PAGO_FACTURAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvFORMA_PAGO_FACTURA].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFORMA_PAGO_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFORMA_PAGO_FACTURA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFORMA_PAGO_FACTURA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTE_FACTURAValue: Currency;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_FACTURA].AsCurrency;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTE_FACTURAValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_FACTURA].AsCurrency := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetIMPORTE_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_FACTURA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvIMPORTE_FACTURA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetID_EMPRESAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_EMPRESA].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID_EMPRESA].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_EMPRESA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID_EMPRESA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetDATOS_BANCARIOSValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvDATOS_BANCARIOS].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetDATOS_BANCARIOSValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvDATOS_BANCARIOS].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetDATOS_BANCARIOSIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvDATOS_BANCARIOS].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvDATOS_BANCARIOS].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetID_PROVEEDORValue: Integer;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_PROVEEDOR].AsInteger;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosCompensadosProvID_PROVEEDOR].AsInteger := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetID_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvID_PROVEEDOR].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetID_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvID_PROVEEDOR].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetNOMBRE_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvNOMBRE_PROVEEDOR].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvNOMBRE_PROVEEDOR].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetNOMBRE_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvNOMBRE_PROVEEDOR].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvNOMBRE_PROVEEDOR].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetNIF_CIF_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvNIF_CIF_PROVEEDOR].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvNIF_CIF_PROVEEDOR].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetNIF_CIF_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvNIF_CIF_PROVEEDOR].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvNIF_CIF_PROVEEDOR].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_ALTA].AsDateTime;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosCompensadosProvFECHA_ALTA].AsDateTime := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_ALTA].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFECHA_ALTA].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_MODIFICACION].AsDateTime;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosCompensadosProvFECHA_MODIFICACION].AsDateTime := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvFECHA_MODIFICACION].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvFECHA_MODIFICACION].AsVariant := Null;
end;
function TRecibosCompensadosProvDataTableRules.GetUSUARIOValue: String;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvUSUARIO].AsString;
end;
procedure TRecibosCompensadosProvDataTableRules.SetUSUARIOValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosCompensadosProvUSUARIO].AsString := aValue;
end;
function TRecibosCompensadosProvDataTableRules.GetUSUARIOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosCompensadosProvUSUARIO].IsNull;
end;
procedure TRecibosCompensadosProvDataTableRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosCompensadosProvUSUARIO].AsVariant := Null;
end;
{ TRecibosProveedorDataTableRules }
constructor TRecibosProveedorDataTableRules.Create(aDataTable: TDADataTable);
begin
inherited;
end;
destructor TRecibosProveedorDataTableRules.Destroy;
begin
inherited;
end;
function TRecibosProveedorDataTableRules.GetIDValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetIDValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetIDIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetIDIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID_RECIBO_COMPENSADO].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID_RECIBO_COMPENSADO].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetID_RECIBO_COMPENSADOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID_RECIBO_COMPENSADO].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID_RECIBO_COMPENSADO].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_REC_COMPENSADO].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorREFERENCIA_REC_COMPENSADO].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_REC_COMPENSADOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_REC_COMPENSADO].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorREFERENCIA_REC_COMPENSADO].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIAValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorREFERENCIA].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorREFERENCIA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_PROVEEDOR].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorREFERENCIA_PROVEEDOR].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_PROVEEDOR].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorREFERENCIA_PROVEEDOR].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetSITUACIONValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorSITUACION].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetSITUACIONValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorSITUACION].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetSITUACIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorSITUACION].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetSITUACIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorSITUACION].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetID_FACTURAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID_FACTURA].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetID_FACTURAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID_FACTURA].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetID_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID_FACTURA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetID_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID_FACTURA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetID_REMESAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID_REMESA].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetID_REMESAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID_REMESA].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetID_REMESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID_REMESA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetID_REMESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID_REMESA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_REMESAValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_REMESA].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_REMESAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorREFERENCIA_REMESA].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_REMESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_REMESA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorREFERENCIA_REMESA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFECHA_EMISIONValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_EMISION].AsDateTime;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_EMISIONValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosProveedorFECHA_EMISION].AsDateTime := aValue;
end;
function TRecibosProveedorDataTableRules.GetFECHA_EMISIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_EMISION].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_EMISIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFECHA_EMISION].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_VENCIMIENTO].AsDateTime;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosProveedorFECHA_VENCIMIENTO].AsDateTime := aValue;
end;
function TRecibosProveedorDataTableRules.GetFECHA_VENCIMIENTOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_VENCIMIENTO].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFECHA_VENCIMIENTO].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetDESCRIPCIONValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorDESCRIPCION].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorDESCRIPCION].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorDESCRIPCION].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorDESCRIPCION].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetOBSERVACIONESValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorOBSERVACIONES].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetOBSERVACIONESValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorOBSERVACIONES].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetOBSERVACIONESIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorOBSERVACIONES].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetOBSERVACIONESIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorOBSERVACIONES].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetIMPORTEValue: Currency;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE].AsCurrency;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTEValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosProveedorIMPORTE].AsCurrency := aValue;
end;
function TRecibosProveedorDataTableRules.GetIMPORTEIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTEIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorIMPORTE].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetOTROS_GASTOSValue: Currency;
begin
result := DataTable.Fields[idx_RecibosProveedorOTROS_GASTOS].AsCurrency;
end;
procedure TRecibosProveedorDataTableRules.SetOTROS_GASTOSValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosProveedorOTROS_GASTOS].AsCurrency := aValue;
end;
function TRecibosProveedorDataTableRules.GetOTROS_GASTOSIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorOTROS_GASTOS].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetOTROS_GASTOSIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorOTROS_GASTOS].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetIMPORTE_TOTALValue: Currency;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE_TOTAL].AsCurrency;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTE_TOTALValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosProveedorIMPORTE_TOTAL].AsCurrency := aValue;
end;
function TRecibosProveedorDataTableRules.GetIMPORTE_TOTALIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE_TOTAL].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorIMPORTE_TOTAL].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_FACTURA_PROVValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_FACTURA_PROV].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorREFERENCIA_FACTURA_PROV].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetREFERENCIA_FACTURA_PROVIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorREFERENCIA_FACTURA_PROV].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetREFERENCIA_FACTURA_PROVIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorREFERENCIA_FACTURA_PROV].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFECHA_FACTURAValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_FACTURA].AsDateTime;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosProveedorFECHA_FACTURA].AsDateTime := aValue;
end;
function TRecibosProveedorDataTableRules.GetFECHA_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_FACTURA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFECHA_FACTURA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFORMA_PAGO_FACTURAValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorFORMA_PAGO_FACTURA].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetFORMA_PAGO_FACTURAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorFORMA_PAGO_FACTURA].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetFORMA_PAGO_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFORMA_PAGO_FACTURA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFORMA_PAGO_FACTURA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetIMPORTE_FACTURAValue: Currency;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE_FACTURA].AsCurrency;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTE_FACTURAValue(const aValue: Currency);
begin
DataTable.Fields[idx_RecibosProveedorIMPORTE_FACTURA].AsCurrency := aValue;
end;
function TRecibosProveedorDataTableRules.GetIMPORTE_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorIMPORTE_FACTURA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorIMPORTE_FACTURA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetID_EMPRESAValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID_EMPRESA].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID_EMPRESA].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID_EMPRESA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID_EMPRESA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetDATOS_BANCARIOS_FACTURAValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS_FACTURA].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetDATOS_BANCARIOS_FACTURAValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS_FACTURA].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetDATOS_BANCARIOS_FACTURAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS_FACTURA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetDATOS_BANCARIOS_FACTURAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS_FACTURA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetDATOS_BANCARIOSValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetDATOS_BANCARIOSValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetDATOS_BANCARIOSIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorDATOS_BANCARIOS].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetID_PROVEEDORValue: Integer;
begin
result := DataTable.Fields[idx_RecibosProveedorID_PROVEEDOR].AsInteger;
end;
procedure TRecibosProveedorDataTableRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
DataTable.Fields[idx_RecibosProveedorID_PROVEEDOR].AsInteger := aValue;
end;
function TRecibosProveedorDataTableRules.GetID_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorID_PROVEEDOR].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetID_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorID_PROVEEDOR].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetNOMBRE_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorNOMBRE_PROVEEDOR].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorNOMBRE_PROVEEDOR].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetNOMBRE_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorNOMBRE_PROVEEDOR].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetNOMBRE_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorNOMBRE_PROVEEDOR].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetNIF_CIF_PROVEEDORValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorNIF_CIF_PROVEEDOR].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorNIF_CIF_PROVEEDOR].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetNIF_CIF_PROVEEDORIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorNIF_CIF_PROVEEDOR].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetNIF_CIF_PROVEEDORIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorNIF_CIF_PROVEEDOR].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_ALTA].AsDateTime;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosProveedorFECHA_ALTA].AsDateTime := aValue;
end;
function TRecibosProveedorDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_ALTA].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFECHA_ALTA].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_MODIFICACION].AsDateTime;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
DataTable.Fields[idx_RecibosProveedorFECHA_MODIFICACION].AsDateTime := aValue;
end;
function TRecibosProveedorDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorFECHA_MODIFICACION].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorFECHA_MODIFICACION].AsVariant := Null;
end;
function TRecibosProveedorDataTableRules.GetUSUARIOValue: String;
begin
result := DataTable.Fields[idx_RecibosProveedorUSUARIO].AsString;
end;
procedure TRecibosProveedorDataTableRules.SetUSUARIOValue(const aValue: String);
begin
DataTable.Fields[idx_RecibosProveedorUSUARIO].AsString := aValue;
end;
function TRecibosProveedorDataTableRules.GetUSUARIOIsNull: boolean;
begin
result := DataTable.Fields[idx_RecibosProveedorUSUARIO].IsNull;
end;
procedure TRecibosProveedorDataTableRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_RecibosProveedorUSUARIO].AsVariant := Null;
end;
{ TPagosProveedorDataTableRules }
constructor TPagosProveedorDataTableRules.Create(aDataTable: TDADataTable);
begin
inherited;
end;
destructor TPagosProveedorDataTableRules.Destroy;
begin
inherited;
end;
function TPagosProveedorDataTableRules.GetIDValue: Integer;
begin
result := DataTable.Fields[idx_PagosProveedorID].AsInteger;
end;
procedure TPagosProveedorDataTableRules.SetIDValue(const aValue: Integer);
begin
DataTable.Fields[idx_PagosProveedorID].AsInteger := aValue;
end;
function TPagosProveedorDataTableRules.GetIDIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorID].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetIDIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorID].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetID_RECIBOValue: Integer;
begin
result := DataTable.Fields[idx_PagosProveedorID_RECIBO].AsInteger;
end;
procedure TPagosProveedorDataTableRules.SetID_RECIBOValue(const aValue: Integer);
begin
DataTable.Fields[idx_PagosProveedorID_RECIBO].AsInteger := aValue;
end;
function TPagosProveedorDataTableRules.GetID_RECIBOIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorID_RECIBO].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetID_RECIBOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorID_RECIBO].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetTIPOValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorTIPO].AsString;
end;
procedure TPagosProveedorDataTableRules.SetTIPOValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorTIPO].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetTIPOIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorTIPO].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetTIPOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorTIPO].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetFECHA_PAGOValue: DateTime;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_PAGO].AsDateTime;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_PAGOValue(const aValue: DateTime);
begin
DataTable.Fields[idx_PagosProveedorFECHA_PAGO].AsDateTime := aValue;
end;
function TPagosProveedorDataTableRules.GetFECHA_PAGOIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_PAGO].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_PAGOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorFECHA_PAGO].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetTITULARValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorTITULAR].AsString;
end;
procedure TPagosProveedorDataTableRules.SetTITULARValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorTITULAR].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetTITULARIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorTITULAR].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetTITULARIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorTITULAR].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetENTIDADValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorENTIDAD].AsString;
end;
procedure TPagosProveedorDataTableRules.SetENTIDADValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorENTIDAD].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetENTIDADIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorENTIDAD].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetENTIDADIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorENTIDAD].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetSUCURSALValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorSUCURSAL].AsString;
end;
procedure TPagosProveedorDataTableRules.SetSUCURSALValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorSUCURSAL].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetSUCURSALIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorSUCURSAL].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetSUCURSALIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorSUCURSAL].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetDCValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorDC].AsString;
end;
procedure TPagosProveedorDataTableRules.SetDCValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorDC].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetDCIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorDC].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetDCIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorDC].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetCUENTAValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorCUENTA].AsString;
end;
procedure TPagosProveedorDataTableRules.SetCUENTAValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorCUENTA].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetCUENTAIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorCUENTA].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetCUENTAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorCUENTA].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_ALTA].AsDateTime;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
DataTable.Fields[idx_PagosProveedorFECHA_ALTA].AsDateTime := aValue;
end;
function TPagosProveedorDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_ALTA].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorFECHA_ALTA].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_MODIFICACION].AsDateTime;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
DataTable.Fields[idx_PagosProveedorFECHA_MODIFICACION].AsDateTime := aValue;
end;
function TPagosProveedorDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorFECHA_MODIFICACION].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorFECHA_MODIFICACION].AsVariant := Null;
end;
function TPagosProveedorDataTableRules.GetUSUARIOValue: String;
begin
result := DataTable.Fields[idx_PagosProveedorUSUARIO].AsString;
end;
procedure TPagosProveedorDataTableRules.SetUSUARIOValue(const aValue: String);
begin
DataTable.Fields[idx_PagosProveedorUSUARIO].AsString := aValue;
end;
function TPagosProveedorDataTableRules.GetUSUARIOIsNull: boolean;
begin
result := DataTable.Fields[idx_PagosProveedorUSUARIO].IsNull;
end;
procedure TPagosProveedorDataTableRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_PagosProveedorUSUARIO].AsVariant := Null;
end;
initialization
RegisterDataTableRules(RID_ListaAnosRecibos, TListaAnosRecibosDataTableRules);
RegisterDataTableRules(RID_RecibosCompensadosProv, TRecibosCompensadosProvDataTableRules);
RegisterDataTableRules(RID_RecibosProveedor, TRecibosProveedorDataTableRules);
RegisterDataTableRules(RID_PagosProveedor, TPagosProveedorDataTableRules);
end.