LuisLeon_FactuGES/Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas

unit schInfVentasArticuloClient_Intf;

interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable;

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_InfVentasArticulo = '{0585A6F2-C390-425E-A7A6-8609D559D3B3}';

  { Data table names }
  nme_InfVentasArticulo = 'InfVentasArticulo';

  { InfVentasArticulo fields }
  fld_InfVentasArticuloID_FACTURA = 'ID_FACTURA';
  fld_InfVentasArticuloID_EMPRESA = 'ID_EMPRESA';
  fld_InfVentasArticuloREFERENCIA_FACTURA = 'REFERENCIA_FACTURA';
  fld_InfVentasArticuloFECHA_FACTURA = 'FECHA_FACTURA';
  fld_InfVentasArticuloIMPORTE_TOTAL_FACTURA = 'IMPORTE_TOTAL_FACTURA';
  fld_InfVentasArticuloID_COMISION_FACTURA = 'ID_COMISION_FACTURA';
  fld_InfVentasArticuloID_ARTICULO = 'ID_ARTICULO';
  fld_InfVentasArticuloFAMILIA = 'FAMILIA';
  fld_InfVentasArticuloREFERENCIA = 'REFERENCIA';
  fld_InfVentasArticuloREFERENCIA_PROV = 'REFERENCIA_PROV';
  fld_InfVentasArticuloDESCRIPCION = 'DESCRIPCION';
  fld_InfVentasArticuloCOMISIONABLE = 'COMISIONABLE';
  fld_InfVentasArticuloINVENTARIABLE = 'INVENTARIABLE';
  fld_InfVentasArticuloIMPORTE_UNIDAD_COSTE = 'IMPORTE_UNIDAD_COSTE';
  fld_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE = 'DESCUENTO_PROVEEDOR_COSTE';
  fld_InfVentasArticuloIMPORTE_NETO_COSTE = 'IMPORTE_NETO_COSTE';
  fld_InfVentasArticuloIMPORTE_PORTE_COSTE = 'IMPORTE_PORTE_COSTE';
  fld_InfVentasArticuloCANTIDAD = 'CANTIDAD';
  fld_InfVentasArticuloIMPORTE_UNIDAD_VENTA = 'IMPORTE_UNIDAD_VENTA';
  fld_InfVentasArticuloDESCUENTO_CLIENTE_VENTA = 'DESCUENTO_CLIENTE_VENTA';
  fld_InfVentasArticuloIMPORTE_NETO_VENTA = 'IMPORTE_NETO_VENTA';
  fld_InfVentasArticuloIMPORTE_PORTE_VENTA = 'IMPORTE_PORTE_VENTA';
  fld_InfVentasArticuloIMPORTE_TOTAL_VENTA = 'IMPORTE_TOTAL_VENTA';
  fld_InfVentasArticuloNIF_CIF_PROVEEDOR = 'NIF_CIF_PROVEEDOR';
  fld_InfVentasArticuloNOMBRE_PROVEEDOR = 'NOMBRE_PROVEEDOR';
  fld_InfVentasArticuloCALLE_PROVEEDOR = 'CALLE_PROVEEDOR';
  fld_InfVentasArticuloPOBLACION_PROVEEDOR = 'POBLACION_PROVEEDOR';
  fld_InfVentasArticuloPROVINCIA_PROVEEDOR = 'PROVINCIA_PROVEEDOR';
  fld_InfVentasArticuloNIF_CIF_CLIENTE = 'NIF_CIF_CLIENTE';
  fld_InfVentasArticuloNOMBRE_CLIENTE = 'NOMBRE_CLIENTE';
  fld_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE = 'NOMBRE_COMERCIAL_CLIENTE';
  fld_InfVentasArticuloCALLE_CLIENTE = 'CALLE_CLIENTE';
  fld_InfVentasArticuloPOBLACION_CLIENTE = 'POBLACION_CLIENTE';
  fld_InfVentasArticuloPROVINCIA_CLIENTE = 'PROVINCIA_CLIENTE';
  fld_InfVentasArticuloNIF_CIF_AGENTE = 'NIF_CIF_AGENTE';
  fld_InfVentasArticuloNOMBRE_AGENTE = 'NOMBRE_AGENTE';
  fld_InfVentasArticuloCALLE_AGENTE = 'CALLE_AGENTE';
  fld_InfVentasArticuloPOBLACION_AGENTE = 'POBLACION_AGENTE';
  fld_InfVentasArticuloPROVINCIA_AGENTE = 'PROVINCIA_AGENTE';
  fld_InfVentasArticuloCOMISION_AGENTE = 'COMISION_AGENTE';
  fld_InfVentasArticuloIMPORTE_COMISION_AGENTE = 'IMPORTE_COMISION_AGENTE';

  { InfVentasArticulo field indexes }
  idx_InfVentasArticuloID_FACTURA = 0;
  idx_InfVentasArticuloID_EMPRESA = 1;
  idx_InfVentasArticuloREFERENCIA_FACTURA = 2;
  idx_InfVentasArticuloFECHA_FACTURA = 3;
  idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA = 4;
  idx_InfVentasArticuloID_COMISION_FACTURA = 5;
  idx_InfVentasArticuloID_ARTICULO = 6;
  idx_InfVentasArticuloFAMILIA = 7;
  idx_InfVentasArticuloREFERENCIA = 8;
  idx_InfVentasArticuloREFERENCIA_PROV = 9;
  idx_InfVentasArticuloDESCRIPCION = 10;
  idx_InfVentasArticuloCOMISIONABLE = 11;
  idx_InfVentasArticuloINVENTARIABLE = 12;
  idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE = 13;
  idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE = 14;
  idx_InfVentasArticuloIMPORTE_NETO_COSTE = 15;
  idx_InfVentasArticuloIMPORTE_PORTE_COSTE = 16;
  idx_InfVentasArticuloCANTIDAD = 17;
  idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA = 18;
  idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA = 19;
  idx_InfVentasArticuloIMPORTE_NETO_VENTA = 20;
  idx_InfVentasArticuloIMPORTE_PORTE_VENTA = 21;
  idx_InfVentasArticuloIMPORTE_TOTAL_VENTA = 22;
  idx_InfVentasArticuloNIF_CIF_PROVEEDOR = 23;
  idx_InfVentasArticuloNOMBRE_PROVEEDOR = 24;
  idx_InfVentasArticuloCALLE_PROVEEDOR = 25;
  idx_InfVentasArticuloPOBLACION_PROVEEDOR = 26;
  idx_InfVentasArticuloPROVINCIA_PROVEEDOR = 27;
  idx_InfVentasArticuloNIF_CIF_CLIENTE = 28;
  idx_InfVentasArticuloNOMBRE_CLIENTE = 29;
  idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE = 30;
  idx_InfVentasArticuloCALLE_CLIENTE = 31;
  idx_InfVentasArticuloPOBLACION_CLIENTE = 32;
  idx_InfVentasArticuloPROVINCIA_CLIENTE = 33;
  idx_InfVentasArticuloNIF_CIF_AGENTE = 34;
  idx_InfVentasArticuloNOMBRE_AGENTE = 35;
  idx_InfVentasArticuloCALLE_AGENTE = 36;
  idx_InfVentasArticuloPOBLACION_AGENTE = 37;
  idx_InfVentasArticuloPROVINCIA_AGENTE = 38;
  idx_InfVentasArticuloCOMISION_AGENTE = 39;
  idx_InfVentasArticuloIMPORTE_COMISION_AGENTE = 40;

type
  { IInfVentasArticulo }
  IInfVentasArticulo = interface(IDAStronglyTypedDataTable)
  ['{91CC4592-F38D-477E-8271-C7D2E9747130}']
    { Property getters and setters }
    function GetID_FACTURAValue: Integer;
    procedure SetID_FACTURAValue(const aValue: Integer);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetREFERENCIA_FACTURAValue: String;
    procedure SetREFERENCIA_FACTURAValue(const aValue: String);
    function GetFECHA_FACTURAValue: DateTime;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime);
    function GetIMPORTE_TOTAL_FACTURAValue: Currency;
    procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency);
    function GetID_COMISION_FACTURAValue: Integer;
    procedure SetID_COMISION_FACTURAValue(const aValue: Integer);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetFAMILIAValue: String;
    procedure SetFAMILIAValue(const aValue: String);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIA_PROVValue: String;
    procedure SetREFERENCIA_PROVValue(const aValue: String);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetCOMISIONABLEValue: Integer;
    procedure SetCOMISIONABLEValue(const aValue: Integer);
    function GetINVENTARIABLEValue: Integer;
    procedure SetINVENTARIABLEValue(const aValue: Integer);
    function GetIMPORTE_UNIDAD_COSTEValue: Currency;
    procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
    function GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
    procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
    function GetIMPORTE_NETO_COSTEValue: Currency;
    procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
    function GetIMPORTE_PORTE_COSTEValue: Currency;
    procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetIMPORTE_UNIDAD_VENTAValue: Currency;
    procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
    function GetDESCUENTO_CLIENTE_VENTAValue: Float;
    procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
    function GetIMPORTE_NETO_VENTAValue: Float;
    procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float);
    function GetIMPORTE_PORTE_VENTAValue: Float;
    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float);
    function GetIMPORTE_TOTAL_VENTAValue: Currency;
    procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
    function GetNIF_CIF_PROVEEDORValue: String;
    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String);
    function GetNOMBRE_PROVEEDORValue: String;
    procedure SetNOMBRE_PROVEEDORValue(const aValue: String);
    function GetCALLE_PROVEEDORValue: String;
    procedure SetCALLE_PROVEEDORValue(const aValue: String);
    function GetPOBLACION_PROVEEDORValue: String;
    procedure SetPOBLACION_PROVEEDORValue(const aValue: String);
    function GetPROVINCIA_PROVEEDORValue: String;
    procedure SetPROVINCIA_PROVEEDORValue(const aValue: String);
    function GetNIF_CIF_CLIENTEValue: String;
    procedure SetNIF_CIF_CLIENTEValue(const aValue: String);
    function GetNOMBRE_CLIENTEValue: String;
    procedure SetNOMBRE_CLIENTEValue(const aValue: String);
    function GetNOMBRE_COMERCIAL_CLIENTEValue: String;
    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
    function GetCALLE_CLIENTEValue: String;
    procedure SetCALLE_CLIENTEValue(const aValue: String);
    function GetPOBLACION_CLIENTEValue: String;
    procedure SetPOBLACION_CLIENTEValue(const aValue: String);
    function GetPROVINCIA_CLIENTEValue: String;
    procedure SetPROVINCIA_CLIENTEValue(const aValue: String);
    function GetNIF_CIF_AGENTEValue: String;
    procedure SetNIF_CIF_AGENTEValue(const aValue: String);
    function GetNOMBRE_AGENTEValue: String;
    procedure SetNOMBRE_AGENTEValue(const aValue: String);
    function GetCALLE_AGENTEValue: String;
    procedure SetCALLE_AGENTEValue(const aValue: String);
    function GetPOBLACION_AGENTEValue: String;
    procedure SetPOBLACION_AGENTEValue(const aValue: String);
    function GetPROVINCIA_AGENTEValue: String;
    procedure SetPROVINCIA_AGENTEValue(const aValue: String);
    function GetCOMISION_AGENTEValue: Float;
    procedure SetCOMISION_AGENTEValue(const aValue: Float);
    function GetIMPORTE_COMISION_AGENTEValue: Currency;
    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency);


    { Properties }
    property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue;
    property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
    property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
    property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
    property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
    property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
    property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
    property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
    property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
    property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
    property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
    property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
    property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
    property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
    property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
    property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
    property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
    property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
    property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
    property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
    property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
    property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
    property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
    property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
    property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
    property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
    property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
    property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
    property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;
  end;

  { TInfVentasArticuloDataTableRules }
  TInfVentasArticuloDataTableRules = class(TDADataTableRules, IInfVentasArticulo)
  private
  protected
    { Property getters and setters }
    function GetID_FACTURAValue: Integer; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetREFERENCIA_FACTURAValue: String; virtual;
    procedure SetREFERENCIA_FACTURAValue(const aValue: String); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    function GetIMPORTE_TOTAL_FACTURAValue: Currency; virtual;
    procedure SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency); virtual;
    function GetID_COMISION_FACTURAValue: Integer; virtual;
    procedure SetID_COMISION_FACTURAValue(const aValue: Integer); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetFAMILIAValue: String; virtual;
    procedure SetFAMILIAValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIA_PROVValue: String; virtual;
    procedure SetREFERENCIA_PROVValue(const aValue: String); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetCOMISIONABLEValue: Integer; virtual;
    procedure SetCOMISIONABLEValue(const aValue: Integer); virtual;
    function GetINVENTARIABLEValue: Integer; virtual;
    procedure SetINVENTARIABLEValue(const aValue: Integer); virtual;
    function GetIMPORTE_UNIDAD_COSTEValue: Currency; virtual;
    procedure SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency); virtual;
    function GetDESCUENTO_PROVEEDOR_COSTEValue: Float; virtual;
    procedure SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float); virtual;
    function GetIMPORTE_NETO_COSTEValue: Currency; virtual;
    procedure SetIMPORTE_NETO_COSTEValue(const aValue: Currency); virtual;
    function GetIMPORTE_PORTE_COSTEValue: Currency; virtual;
    procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
    procedure SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency); virtual;
    function GetDESCUENTO_CLIENTE_VENTAValue: Float; virtual;
    procedure SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float); virtual;
    function GetIMPORTE_NETO_VENTAValue: Float; virtual;
    procedure SetIMPORTE_NETO_VENTAValue(const aValue: Float); virtual;
    function GetIMPORTE_PORTE_VENTAValue: Float; virtual;
    procedure SetIMPORTE_PORTE_VENTAValue(const aValue: Float); virtual;
    function GetIMPORTE_TOTAL_VENTAValue: Currency; virtual;
    procedure SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency); virtual;
    function GetNIF_CIF_PROVEEDORValue: String; virtual;
    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
    function GetNOMBRE_PROVEEDORValue: String; virtual;
    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
    function GetCALLE_PROVEEDORValue: String; virtual;
    procedure SetCALLE_PROVEEDORValue(const aValue: String); virtual;
    function GetPOBLACION_PROVEEDORValue: String; virtual;
    procedure SetPOBLACION_PROVEEDORValue(const aValue: String); virtual;
    function GetPROVINCIA_PROVEEDORValue: String; virtual;
    procedure SetPROVINCIA_PROVEEDORValue(const aValue: String); virtual;
    function GetNIF_CIF_CLIENTEValue: String; virtual;
    procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
    function GetNOMBRE_CLIENTEValue: String; virtual;
    procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
    function GetNOMBRE_COMERCIAL_CLIENTEValue: String; virtual;
    procedure SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String); virtual;
    function GetCALLE_CLIENTEValue: String; virtual;
    procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
    function GetPOBLACION_CLIENTEValue: String; virtual;
    procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
    function GetPROVINCIA_CLIENTEValue: String; virtual;
    procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
    function GetNIF_CIF_AGENTEValue: String; virtual;
    procedure SetNIF_CIF_AGENTEValue(const aValue: String); virtual;
    function GetNOMBRE_AGENTEValue: String; virtual;
    procedure SetNOMBRE_AGENTEValue(const aValue: String); virtual;
    function GetCALLE_AGENTEValue: String; virtual;
    procedure SetCALLE_AGENTEValue(const aValue: String); virtual;
    function GetPOBLACION_AGENTEValue: String; virtual;
    procedure SetPOBLACION_AGENTEValue(const aValue: String); virtual;
    function GetPROVINCIA_AGENTEValue: String; virtual;
    procedure SetPROVINCIA_AGENTEValue(const aValue: String); virtual;
    function GetCOMISION_AGENTEValue: Float; virtual;
    procedure SetCOMISION_AGENTEValue(const aValue: Float); virtual;
    function GetIMPORTE_COMISION_AGENTEValue: Currency; virtual;
    procedure SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency); virtual;

    { Properties }
    property ID_FACTURA: Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_FACTURA: String read GetREFERENCIA_FACTURAValue write SetREFERENCIA_FACTURAValue;
    property FECHA_FACTURA: DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property IMPORTE_TOTAL_FACTURA: Currency read GetIMPORTE_TOTAL_FACTURAValue write SetIMPORTE_TOTAL_FACTURAValue;
    property ID_COMISION_FACTURA: Integer read GetID_COMISION_FACTURAValue write SetID_COMISION_FACTURAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIA_PROV: String read GetREFERENCIA_PROVValue write SetREFERENCIA_PROVValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property COMISIONABLE: Integer read GetCOMISIONABLEValue write SetCOMISIONABLEValue;
    property INVENTARIABLE: Integer read GetINVENTARIABLEValue write SetINVENTARIABLEValue;
    property IMPORTE_UNIDAD_COSTE: Currency read GetIMPORTE_UNIDAD_COSTEValue write SetIMPORTE_UNIDAD_COSTEValue;
    property DESCUENTO_PROVEEDOR_COSTE: Float read GetDESCUENTO_PROVEEDOR_COSTEValue write SetDESCUENTO_PROVEEDOR_COSTEValue;
    property IMPORTE_NETO_COSTE: Currency read GetIMPORTE_NETO_COSTEValue write SetIMPORTE_NETO_COSTEValue;
    property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
    property DESCUENTO_CLIENTE_VENTA: Float read GetDESCUENTO_CLIENTE_VENTAValue write SetDESCUENTO_CLIENTE_VENTAValue;
    property IMPORTE_NETO_VENTA: Float read GetIMPORTE_NETO_VENTAValue write SetIMPORTE_NETO_VENTAValue;
    property IMPORTE_PORTE_VENTA: Float read GetIMPORTE_PORTE_VENTAValue write SetIMPORTE_PORTE_VENTAValue;
    property IMPORTE_TOTAL_VENTA: Currency read GetIMPORTE_TOTAL_VENTAValue write SetIMPORTE_TOTAL_VENTAValue;
    property NIF_CIF_PROVEEDOR: String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
    property NOMBRE_PROVEEDOR: String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
    property CALLE_PROVEEDOR: String read GetCALLE_PROVEEDORValue write SetCALLE_PROVEEDORValue;
    property POBLACION_PROVEEDOR: String read GetPOBLACION_PROVEEDORValue write SetPOBLACION_PROVEEDORValue;
    property PROVINCIA_PROVEEDOR: String read GetPROVINCIA_PROVEEDORValue write SetPROVINCIA_PROVEEDORValue;
    property NIF_CIF_CLIENTE: String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
    property NOMBRE_CLIENTE: String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
    property NOMBRE_COMERCIAL_CLIENTE: String read GetNOMBRE_COMERCIAL_CLIENTEValue write SetNOMBRE_COMERCIAL_CLIENTEValue;
    property CALLE_CLIENTE: String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
    property POBLACION_CLIENTE: String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
    property PROVINCIA_CLIENTE: String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
    property NIF_CIF_AGENTE: String read GetNIF_CIF_AGENTEValue write SetNIF_CIF_AGENTEValue;
    property NOMBRE_AGENTE: String read GetNOMBRE_AGENTEValue write SetNOMBRE_AGENTEValue;
    property CALLE_AGENTE: String read GetCALLE_AGENTEValue write SetCALLE_AGENTEValue;
    property POBLACION_AGENTE: String read GetPOBLACION_AGENTEValue write SetPOBLACION_AGENTEValue;
    property PROVINCIA_AGENTE: String read GetPROVINCIA_AGENTEValue write SetPROVINCIA_AGENTEValue;
    property COMISION_AGENTE: Float read GetCOMISION_AGENTEValue write SetCOMISION_AGENTEValue;
    property IMPORTE_COMISION_AGENTE: Currency read GetIMPORTE_COMISION_AGENTEValue write SetIMPORTE_COMISION_AGENTEValue;

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

  end;

implementation

uses Variants;

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

destructor TInfVentasArticuloDataTableRules.Destroy;
begin
  inherited;
end;

function TInfVentasArticuloDataTableRules.GetID_FACTURAValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloID_FACTURA].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetID_FACTURAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloID_FACTURA].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloID_EMPRESA].AsInteger;
end;

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

function TInfVentasArticuloDataTableRules.GetREFERENCIA_FACTURAValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetREFERENCIA_FACTURAValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloREFERENCIA_FACTURA].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].AsDateTime;
end;

procedure TInfVentasArticuloDataTableRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_InfVentasArticuloFECHA_FACTURA].AsDateTime := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_FACTURAValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_TOTAL_FACTURAValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_FACTURA].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetID_COMISION_FACTURAValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetID_COMISION_FACTURAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloID_COMISION_FACTURA].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloID_ARTICULO].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetFAMILIAValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloFAMILIA].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetFAMILIAValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloFAMILIA].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA].AsString;
end;

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

function TInfVentasArticuloDataTableRules.GetREFERENCIA_PROVValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetREFERENCIA_PROVValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloREFERENCIA_PROV].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloDESCRIPCION].AsString;
end;

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

function TInfVentasArticuloDataTableRules.GetCOMISIONABLEValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetCOMISIONABLEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloCOMISIONABLE].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetINVENTARIABLEValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetINVENTARIABLEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloINVENTARIABLE].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_COSTEValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_UNIDAD_COSTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_COSTE].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetDESCUENTO_PROVEEDOR_COSTEValue: Float;
begin
  result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat;
end;

procedure TInfVentasArticuloDataTableRules.SetDESCUENTO_PROVEEDOR_COSTEValue(const aValue: Float);
begin
  DataTable.Fields[idx_InfVentasArticuloDESCUENTO_PROVEEDOR_COSTE].AsFloat := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_COSTEValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_NETO_COSTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_COSTE].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_COSTEValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_COSTE].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsInteger;
end;

procedure TInfVentasArticuloDataTableRules.SetCANTIDADValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InfVentasArticuloCANTIDAD].AsInteger := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_UNIDAD_VENTAValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_UNIDAD_VENTAValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_UNIDAD_VENTA].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetDESCUENTO_CLIENTE_VENTAValue: Float;
begin
  result := DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].AsFloat;
end;

procedure TInfVentasArticuloDataTableRules.SetDESCUENTO_CLIENTE_VENTAValue(const aValue: Float);
begin
  DataTable.Fields[idx_InfVentasArticuloDESCUENTO_CLIENTE_VENTA].AsFloat := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_NETO_VENTAValue: Float;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].AsFloat;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_NETO_VENTAValue(const aValue: Float);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_NETO_VENTA].AsFloat := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_PORTE_VENTAValue: Float;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsFloat;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_PORTE_VENTAValue(const aValue: Float);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_PORTE_VENTA].AsFloat := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_TOTAL_VENTAValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_VENTA].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_TOTAL_VENTAValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_TOTAL_VENTA].AsCurrency := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNIF_CIF_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNIF_CIF_PROVEEDOR].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNOMBRE_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNOMBRE_PROVEEDOR].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetCALLE_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetCALLE_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloCALLE_PROVEEDOR].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPOBLACION_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPOBLACION_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPOBLACION_PROVEEDOR].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPROVINCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPROVINCIA_PROVEEDOR].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNIF_CIF_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNIF_CIF_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNOMBRE_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNOMBRE_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNOMBRE_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNOMBRE_COMERCIAL_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNOMBRE_COMERCIAL_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNOMBRE_COMERCIAL_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetCALLE_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetCALLE_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloCALLE_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPOBLACION_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPOBLACION_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPOBLACION_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPROVINCIA_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPROVINCIA_CLIENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNIF_CIF_AGENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNIF_CIF_AGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNIF_CIF_AGENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetNOMBRE_AGENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetNOMBRE_AGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloNOMBRE_AGENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetCALLE_AGENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetCALLE_AGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloCALLE_AGENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPOBLACION_AGENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPOBLACION_AGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPOBLACION_AGENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetPROVINCIA_AGENTEValue: String;
begin
  result := DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].AsString;
end;

procedure TInfVentasArticuloDataTableRules.SetPROVINCIA_AGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_InfVentasArticuloPROVINCIA_AGENTE].AsString := aValue;
end;

function TInfVentasArticuloDataTableRules.GetCOMISION_AGENTEValue: Float;
begin
  result := DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].AsFloat;
end;

procedure TInfVentasArticuloDataTableRules.SetCOMISION_AGENTEValue(const aValue: Float);
begin
  DataTable.Fields[idx_InfVentasArticuloCOMISION_AGENTE].AsFloat := aValue;
end;

function TInfVentasArticuloDataTableRules.GetIMPORTE_COMISION_AGENTEValue: Currency;
begin
  result := DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsCurrency;
end;

procedure TInfVentasArticuloDataTableRules.SetIMPORTE_COMISION_AGENTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_InfVentasArticuloIMPORTE_COMISION_AGENTE].AsCurrency := aValue;
end;


initialization
  RegisterDataTableRules(RID_InfVentasArticulo, TInfVentasArticuloDataTableRules);

end.