Tecsitel_FactuGES2/Source/Modulos/Remesas de cliente/Model/schRemesasClienteClient_Intf.pas

unit schRemesasClienteClient_Intf;

interface

uses
  Classes, DB, schBase_Intf, SysUtils, uROClasses, 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_ListaAnosRemesas = '{18B30F17-EDCE-4FFF-A761-BC8F65564F29}';
  RID_RemesasCliente = '{ECFA8C62-D24D-4A6D-97E2-4A0CECBE1704}';

  { Data table names }
  nme_ListaAnosRemesas = 'ListaAnosRemesas';
  nme_RemesasCliente = 'RemesasCliente';

  { ListaAnosRemesas fields }
  fld_ListaAnosRemesasANO = 'ANO';

  { ListaAnosRemesas field indexes }
  idx_ListaAnosRemesasANO = 0;

  { RemesasCliente fields }
  fld_RemesasClienteID = 'ID';
  fld_RemesasClienteID_EMPRESA = 'ID_EMPRESA';
  fld_RemesasClienteREFERENCIA = 'REFERENCIA';
  fld_RemesasClienteTIPO = 'TIPO';
  fld_RemesasClienteFECHA_REMESA = 'FECHA_REMESA';
  fld_RemesasClienteDESCRIPCION = 'DESCRIPCION';
  fld_RemesasClienteID_DATOS_BANCO = 'ID_DATOS_BANCO';
  fld_RemesasClienteFECHA_ALTA = 'FECHA_ALTA';
  fld_RemesasClienteFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_RemesasClienteUSUARIO = 'USUARIO';
  fld_RemesasClienteNOMBRE = 'NOMBRE';
  fld_RemesasClienteENTIDAD = 'ENTIDAD';
  fld_RemesasClienteSUCURSAL = 'SUCURSAL';
  fld_RemesasClienteDC = 'DC';
  fld_RemesasClienteCUENTA = 'CUENTA';
  fld_RemesasClienteSUFIJO_N19 = 'SUFIJO_N19';
  fld_RemesasClienteSUFIJO_N58 = 'SUFIJO_N58';
  fld_RemesasClienteIMPORTE_TOTAL = 'IMPORTE_TOTAL';

  { RemesasCliente field indexes }
  idx_RemesasClienteID = 0;
  idx_RemesasClienteID_EMPRESA = 1;
  idx_RemesasClienteREFERENCIA = 2;
  idx_RemesasClienteTIPO = 3;
  idx_RemesasClienteFECHA_REMESA = 4;
  idx_RemesasClienteDESCRIPCION = 5;
  idx_RemesasClienteID_DATOS_BANCO = 6;
  idx_RemesasClienteFECHA_ALTA = 7;
  idx_RemesasClienteFECHA_MODIFICACION = 8;
  idx_RemesasClienteUSUARIO = 9;
  idx_RemesasClienteNOMBRE = 10;
  idx_RemesasClienteENTIDAD = 11;
  idx_RemesasClienteSUCURSAL = 12;
  idx_RemesasClienteDC = 13;
  idx_RemesasClienteCUENTA = 14;
  idx_RemesasClienteSUFIJO_N19 = 15;
  idx_RemesasClienteSUFIJO_N58 = 16;
  idx_RemesasClienteIMPORTE_TOTAL = 17;

type
  { IListaAnosRemesas }
  IListaAnosRemesas = interface(IDAStronglyTypedDataTable)
  ['{E749CD10-676C-459A-996A-8690F0712301}']
    { 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;

  { TListaAnosRemesasDataTableRules }
  TListaAnosRemesasDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosRemesas)
  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;

  { IRemesasCliente }
  IRemesasCliente = interface(IDAStronglyTypedDataTable)
  ['{5AB6B670-D2E4-4409-BCD6-18F8F2E1BDAC}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetTIPOValue: String;
    procedure SetTIPOValue(const aValue: String);
    function GetTIPOIsNull: Boolean;
    procedure SetTIPOIsNull(const aValue: Boolean);
    function GetFECHA_REMESAValue: DateTime;
    procedure SetFECHA_REMESAValue(const aValue: DateTime);
    function GetFECHA_REMESAIsNull: Boolean;
    procedure SetFECHA_REMESAIsNull(const aValue: Boolean);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetDESCRIPCIONIsNull: Boolean;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
    function GetID_DATOS_BANCOValue: Integer;
    procedure SetID_DATOS_BANCOValue(const aValue: Integer);
    function GetID_DATOS_BANCOIsNull: Boolean;
    procedure SetID_DATOS_BANCOIsNull(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);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(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 GetSUFIJO_N19Value: String;
    procedure SetSUFIJO_N19Value(const aValue: String);
    function GetSUFIJO_N19IsNull: Boolean;
    procedure SetSUFIJO_N19IsNull(const aValue: Boolean);
    function GetSUFIJO_N58Value: String;
    procedure SetSUFIJO_N58Value(const aValue: String);
    function GetSUFIJO_N58IsNull: Boolean;
    procedure SetSUFIJO_N58IsNull(const aValue: Boolean);
    function GetIMPORTE_TOTALValue: Currency;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency);
    function GetIMPORTE_TOTALIsNull: Boolean;
    procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property TIPO: String read GetTIPOValue write SetTIPOValue;
    property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
    property FECHA_REMESA: DateTime read GetFECHA_REMESAValue write SetFECHA_REMESAValue;
    property FECHA_REMESAIsNull: Boolean read GetFECHA_REMESAIsNull write SetFECHA_REMESAIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
    property ID_DATOS_BANCO: Integer read GetID_DATOS_BANCOValue write SetID_DATOS_BANCOValue;
    property ID_DATOS_BANCOIsNull: Boolean read GetID_DATOS_BANCOIsNull write SetID_DATOS_BANCOIsNull;
    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;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    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 SUFIJO_N19: String read GetSUFIJO_N19Value write SetSUFIJO_N19Value;
    property SUFIJO_N19IsNull: Boolean read GetSUFIJO_N19IsNull write SetSUFIJO_N19IsNull;
    property SUFIJO_N58: String read GetSUFIJO_N58Value write SetSUFIJO_N58Value;
    property SUFIJO_N58IsNull: Boolean read GetSUFIJO_N58IsNull write SetSUFIJO_N58IsNull;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
  end;

  { TRemesasClienteDataTableRules }
  TRemesasClienteDataTableRules = class(TIntfObjectDADataTableRules, IRemesasCliente)
  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_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(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 GetTIPOValue: String; virtual;
    procedure SetTIPOValue(const aValue: String); virtual;
    function GetTIPOIsNull: Boolean; virtual;
    procedure SetTIPOIsNull(const aValue: Boolean); virtual;
    function GetFECHA_REMESAValue: DateTime; virtual;
    procedure SetFECHA_REMESAValue(const aValue: DateTime); virtual;
    function GetFECHA_REMESAIsNull: Boolean; virtual;
    procedure SetFECHA_REMESAIsNull(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 GetID_DATOS_BANCOValue: Integer; virtual;
    procedure SetID_DATOS_BANCOValue(const aValue: Integer); virtual;
    function GetID_DATOS_BANCOIsNull: Boolean; virtual;
    procedure SetID_DATOS_BANCOIsNull(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;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(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 GetSUFIJO_N19Value: String; virtual;
    procedure SetSUFIJO_N19Value(const aValue: String); virtual;
    function GetSUFIJO_N19IsNull: Boolean; virtual;
    procedure SetSUFIJO_N19IsNull(const aValue: Boolean); virtual;
    function GetSUFIJO_N58Value: String; virtual;
    procedure SetSUFIJO_N58Value(const aValue: String); virtual;
    function GetSUFIJO_N58IsNull: Boolean; virtual;
    procedure SetSUFIJO_N58IsNull(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;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property TIPO: String read GetTIPOValue write SetTIPOValue;
    property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
    property FECHA_REMESA: DateTime read GetFECHA_REMESAValue write SetFECHA_REMESAValue;
    property FECHA_REMESAIsNull: Boolean read GetFECHA_REMESAIsNull write SetFECHA_REMESAIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
    property ID_DATOS_BANCO: Integer read GetID_DATOS_BANCOValue write SetID_DATOS_BANCOValue;
    property ID_DATOS_BANCOIsNull: Boolean read GetID_DATOS_BANCOIsNull write SetID_DATOS_BANCOIsNull;
    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;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    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 SUFIJO_N19: String read GetSUFIJO_N19Value write SetSUFIJO_N19Value;
    property SUFIJO_N19IsNull: Boolean read GetSUFIJO_N19IsNull write SetSUFIJO_N19IsNull;
    property SUFIJO_N58: String read GetSUFIJO_N58Value write SetSUFIJO_N58Value;
    property SUFIJO_N58IsNull: Boolean read GetSUFIJO_N58IsNull write SetSUFIJO_N58IsNull;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property IMPORTE_TOTALIsNull: Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;

  public
    constructor Create(aDataTable: TDADataTable); override;
    destructor Destroy; override;

  end;

implementation

uses Variants, uROBinaryHelpers;

{ TListaAnosRemesasDataTableRules }
constructor TListaAnosRemesasDataTableRules.Create(aDataTable: TDADataTable);
begin
  inherited;
end;

destructor TListaAnosRemesasDataTableRules.Destroy;
begin
  inherited;
end;

function TListaAnosRemesasDataTableRules.GetANOValue: String;
begin
  result := DataTable.Fields[idx_ListaAnosRemesasANO].AsString;
end;

procedure TListaAnosRemesasDataTableRules.SetANOValue(const aValue: String);
begin
  DataTable.Fields[idx_ListaAnosRemesasANO].AsString := aValue;
end;

function TListaAnosRemesasDataTableRules.GetANOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ListaAnosRemesasANO].IsNull;
end;

procedure TListaAnosRemesasDataTableRules.SetANOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ListaAnosRemesasANO].AsVariant := Null;
end;


{ TRemesasClienteDataTableRules }
constructor TRemesasClienteDataTableRules.Create(aDataTable: TDADataTable);
begin
  inherited;
end;

destructor TRemesasClienteDataTableRules.Destroy;
begin
  inherited;
end;

function TRemesasClienteDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_RemesasClienteID].AsInteger;
end;

procedure TRemesasClienteDataTableRules.SetIDValue(const aValue: Integer);
begin
  DataTable.Fields[idx_RemesasClienteID].AsInteger := aValue;
end;

function TRemesasClienteDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteID].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetIDIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteID].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_RemesasClienteID_EMPRESA].AsInteger;
end;

procedure TRemesasClienteDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_RemesasClienteID_EMPRESA].AsInteger := aValue;
end;

function TRemesasClienteDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteID_EMPRESA].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteID_EMPRESA].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteREFERENCIA].AsString;
end;

procedure TRemesasClienteDataTableRules.SetREFERENCIAValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteREFERENCIA].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteREFERENCIA].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteREFERENCIA].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetTIPOValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteTIPO].AsString;
end;

procedure TRemesasClienteDataTableRules.SetTIPOValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteTIPO].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetTIPOIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteTIPO].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetTIPOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteTIPO].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetFECHA_REMESAValue: DateTime;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_REMESA].AsDateTime;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_REMESAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_RemesasClienteFECHA_REMESA].AsDateTime := aValue;
end;

function TRemesasClienteDataTableRules.GetFECHA_REMESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_REMESA].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_REMESAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteFECHA_REMESA].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteDESCRIPCION].AsString;
end;

procedure TRemesasClienteDataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteDESCRIPCION].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteDESCRIPCION].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteDESCRIPCION].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetID_DATOS_BANCOValue: Integer;
begin
  result := DataTable.Fields[idx_RemesasClienteID_DATOS_BANCO].AsInteger;
end;

procedure TRemesasClienteDataTableRules.SetID_DATOS_BANCOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_RemesasClienteID_DATOS_BANCO].AsInteger := aValue;
end;

function TRemesasClienteDataTableRules.GetID_DATOS_BANCOIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteID_DATOS_BANCO].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetID_DATOS_BANCOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteID_DATOS_BANCO].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_ALTA].AsDateTime;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_RemesasClienteFECHA_ALTA].AsDateTime := aValue;
end;

function TRemesasClienteDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_ALTA].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteFECHA_ALTA].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_MODIFICACION].AsDateTime;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_RemesasClienteFECHA_MODIFICACION].AsDateTime := aValue;
end;

function TRemesasClienteDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteFECHA_MODIFICACION].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteFECHA_MODIFICACION].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteUSUARIO].AsString;
end;

procedure TRemesasClienteDataTableRules.SetUSUARIOValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteUSUARIO].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteUSUARIO].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteUSUARIO].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteNOMBRE].AsString;
end;

procedure TRemesasClienteDataTableRules.SetNOMBREValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteNOMBRE].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteNOMBRE].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetNOMBREIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteNOMBRE].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetENTIDADValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteENTIDAD].AsString;
end;

procedure TRemesasClienteDataTableRules.SetENTIDADValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteENTIDAD].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetENTIDADIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteENTIDAD].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetENTIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteENTIDAD].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetSUCURSALValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteSUCURSAL].AsString;
end;

procedure TRemesasClienteDataTableRules.SetSUCURSALValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteSUCURSAL].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetSUCURSALIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteSUCURSAL].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetSUCURSALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteSUCURSAL].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetDCValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteDC].AsString;
end;

procedure TRemesasClienteDataTableRules.SetDCValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteDC].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetDCIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteDC].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetDCIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteDC].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetCUENTAValue: String;
begin
  result := DataTable.Fields[idx_RemesasClienteCUENTA].AsString;
end;

procedure TRemesasClienteDataTableRules.SetCUENTAValue(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteCUENTA].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetCUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteCUENTA].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteCUENTA].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetSUFIJO_N19Value: String;
begin
  result := DataTable.Fields[idx_RemesasClienteSUFIJO_N19].AsString;
end;

procedure TRemesasClienteDataTableRules.SetSUFIJO_N19Value(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteSUFIJO_N19].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetSUFIJO_N19IsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteSUFIJO_N19].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetSUFIJO_N19IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteSUFIJO_N19].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetSUFIJO_N58Value: String;
begin
  result := DataTable.Fields[idx_RemesasClienteSUFIJO_N58].AsString;
end;

procedure TRemesasClienteDataTableRules.SetSUFIJO_N58Value(const aValue: String);
begin
  DataTable.Fields[idx_RemesasClienteSUFIJO_N58].AsString := aValue;
end;

function TRemesasClienteDataTableRules.GetSUFIJO_N58IsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteSUFIJO_N58].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetSUFIJO_N58IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteSUFIJO_N58].AsVariant := Null;
end;

function TRemesasClienteDataTableRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := DataTable.Fields[idx_RemesasClienteIMPORTE_TOTAL].AsCurrency;
end;

procedure TRemesasClienteDataTableRules.SetIMPORTE_TOTALValue(const aValue: Currency);
begin
  DataTable.Fields[idx_RemesasClienteIMPORTE_TOTAL].AsCurrency := aValue;
end;

function TRemesasClienteDataTableRules.GetIMPORTE_TOTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_RemesasClienteIMPORTE_TOTAL].IsNull;
end;

procedure TRemesasClienteDataTableRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_RemesasClienteIMPORTE_TOTAL].AsVariant := Null;
end;


initialization
  RegisterDataTableRules(RID_ListaAnosRemesas, TListaAnosRemesasDataTableRules);
  RegisterDataTableRules(RID_RemesasCliente, TRemesasClienteDataTableRules);

end.