LuisLeon_FactuGES/Source/Modulos/Pedidos a proveedor/Model/schPedidosProveedorClient_Intf.pas

unit schPedidosProveedorClient_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_DarReferencia = '{9D9C3B70-4476-4732-B123-47F58F4C108E}';
  RID_PedidosProveedor = '{416EEEE9-486B-48BB-A166-C897B8AD547B}';
  RID_PedidosProveedor_Detalles = '{78C3C840-8365-4799-AE68-CF6A6C91A435}';
  RID_PedidosProveedor_Detalles_Refresh = '{B4C479AA-6A22-4709-98F6-411D9E0D1EA6}';
  RID_PedidosProveedor_Refresh = '{50C3DBAC-DFDA-4139-BB81-C61BEE0C0169}';
  RID_PedidosProveedor_Articulos_Pendientes = '{1CBEF2D9-1134-4F0C-8EAB-BBF5A7B1EFFD}';

  { Data table names }
  nme_DarReferencia = 'DarReferencia';
  nme_PedidosProveedor = 'PedidosProveedor';
  nme_PedidosProveedor_Detalles = 'PedidosProveedor_Detalles';
  nme_PedidosProveedor_Detalles_Refresh = 'PedidosProveedor_Detalles_Refresh';
  nme_PedidosProveedor_Refresh = 'PedidosProveedor_Refresh';
  nme_PedidosProveedor_Articulos_Pendientes = 'PedidosProveedor_Articulos_Pendientes';

  { DarReferencia fields }
  fld_DarReferenciaVALOR = 'VALOR';

  { DarReferencia field indexes }
  idx_DarReferenciaVALOR = 0;

  { PedidosProveedor fields }
  fld_PedidosProveedorID = 'ID';
  fld_PedidosProveedorID_EMPRESA = 'ID_EMPRESA';
  fld_PedidosProveedorID_PROVEEDOR = 'ID_PROVEEDOR';
  fld_PedidosProveedorNOMBRE = 'NOMBRE';
  fld_PedidosProveedorREFERENCIA = 'REFERENCIA';
  fld_PedidosProveedorSITUACION = 'SITUACION';
  fld_PedidosProveedorFECHA_ENVIO = 'FECHA_ENVIO';
  fld_PedidosProveedorFECHA_PEDIDO = 'FECHA_PEDIDO';
  fld_PedidosProveedorFECHA_CONFIRMACION = 'FECHA_CONFIRMACION';
  fld_PedidosProveedorFECHA_ENTREGA = 'FECHA_ENTREGA';
  fld_PedidosProveedorID_ALMACEN = 'ID_ALMACEN';
  fld_PedidosProveedorNOMBRE_ALMACEN = 'NOMBRE_ALMACEN';
  fld_PedidosProveedorOBSERVACIONES = 'OBSERVACIONES';
  fld_PedidosProveedorIMPORTE_TOTAL = 'IMPORTE_TOTAL';
  fld_PedidosProveedorINCIDENCIAS = 'INCIDENCIAS';
  fld_PedidosProveedorINCIDENCIAS_ACTIVAS = 'INCIDENCIAS_ACTIVAS';
  fld_PedidosProveedorCALLE = 'CALLE';
  fld_PedidosProveedorPOBLACION = 'POBLACION';
  fld_PedidosProveedorPROVINCIA = 'PROVINCIA';
  fld_PedidosProveedorCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_PedidosProveedorPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_PedidosProveedorTELEFONO = 'TELEFONO';
  fld_PedidosProveedorFECHA_ALTA = 'FECHA_ALTA';
  fld_PedidosProveedorFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_PedidosProveedorUSUARIO = 'USUARIO';
  fld_PedidosProveedorID_PEDIDO_CLIENTE = 'ID_PEDIDO_CLIENTE';
  fld_PedidosProveedorREF_PED_CLIENTE = 'REF_PED_CLIENTE';
  fld_PedidosProveedorIMPORTE_NETO = 'IMPORTE_NETO';
  fld_PedidosProveedorIMPORTE_PORTE = 'IMPORTE_PORTE';
  fld_PedidosProveedorDESCUENTO = 'DESCUENTO';
  fld_PedidosProveedorIMPORTE_DESCUENTO = 'IMPORTE_DESCUENTO';
  fld_PedidosProveedorBASE_IMPONIBLE = 'BASE_IMPONIBLE';
  fld_PedidosProveedorIVA = 'IVA';
  fld_PedidosProveedorIMPORTE_IVA = 'IMPORTE_IVA';
  fld_PedidosProveedorID_FORMA_PAGO = 'ID_FORMA_PAGO';

  { PedidosProveedor field indexes }
  idx_PedidosProveedorID = 0;
  idx_PedidosProveedorID_EMPRESA = 1;
  idx_PedidosProveedorID_PROVEEDOR = 2;
  idx_PedidosProveedorNOMBRE = 3;
  idx_PedidosProveedorREFERENCIA = 4;
  idx_PedidosProveedorSITUACION = 5;
  idx_PedidosProveedorFECHA_ENVIO = 6;
  idx_PedidosProveedorFECHA_PEDIDO = 7;
  idx_PedidosProveedorFECHA_CONFIRMACION = 8;
  idx_PedidosProveedorFECHA_ENTREGA = 9;
  idx_PedidosProveedorID_ALMACEN = 10;
  idx_PedidosProveedorNOMBRE_ALMACEN = 11;
  idx_PedidosProveedorOBSERVACIONES = 12;
  idx_PedidosProveedorIMPORTE_TOTAL = 13;
  idx_PedidosProveedorINCIDENCIAS = 14;
  idx_PedidosProveedorINCIDENCIAS_ACTIVAS = 15;
  idx_PedidosProveedorCALLE = 16;
  idx_PedidosProveedorPOBLACION = 17;
  idx_PedidosProveedorPROVINCIA = 18;
  idx_PedidosProveedorCODIGO_POSTAL = 19;
  idx_PedidosProveedorPERSONA_CONTACTO = 20;
  idx_PedidosProveedorTELEFONO = 21;
  idx_PedidosProveedorFECHA_ALTA = 22;
  idx_PedidosProveedorFECHA_MODIFICACION = 23;
  idx_PedidosProveedorUSUARIO = 24;
  idx_PedidosProveedorID_PEDIDO_CLIENTE = 25;
  idx_PedidosProveedorREF_PED_CLIENTE = 26;
  idx_PedidosProveedorIMPORTE_NETO = 27;
  idx_PedidosProveedorIMPORTE_PORTE = 28;
  idx_PedidosProveedorDESCUENTO = 29;
  idx_PedidosProveedorIMPORTE_DESCUENTO = 30;
  idx_PedidosProveedorBASE_IMPONIBLE = 31;
  idx_PedidosProveedorIVA = 32;
  idx_PedidosProveedorIMPORTE_IVA = 33;
  idx_PedidosProveedorID_FORMA_PAGO = 34;

  { PedidosProveedor_Detalles fields }
  fld_PedidosProveedor_DetallesID = 'ID';
  fld_PedidosProveedor_DetallesID_PEDIDO = 'ID_PEDIDO';
  fld_PedidosProveedor_DetallesPOSICION = 'POSICION';
  fld_PedidosProveedor_DetallesTIPO_DETALLE = 'TIPO_DETALLE';
  fld_PedidosProveedor_DetallesREFERENCIA = 'REFERENCIA';
  fld_PedidosProveedor_DetallesID_ARTICULO = 'ID_ARTICULO';
  fld_PedidosProveedor_DetallesCONCEPTO = 'CONCEPTO';
  fld_PedidosProveedor_DetallesCANTIDAD = 'CANTIDAD';
  fld_PedidosProveedor_DetallesIMPORTE_UNIDAD = 'IMPORTE_UNIDAD';
  fld_PedidosProveedor_DetallesIMPORTE_TOTAL = 'IMPORTE_TOTAL';
  fld_PedidosProveedor_DetallesDESCUENTO = 'DESCUENTO';
  fld_PedidosProveedor_DetallesIMPORTE_PORTE = 'IMPORTE_PORTE';
  fld_PedidosProveedor_DetallesVISIBLE = 'VISIBLE';
  fld_PedidosProveedor_DetallesREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';

  { PedidosProveedor_Detalles field indexes }
  idx_PedidosProveedor_DetallesID = 0;
  idx_PedidosProveedor_DetallesID_PEDIDO = 1;
  idx_PedidosProveedor_DetallesPOSICION = 2;
  idx_PedidosProveedor_DetallesTIPO_DETALLE = 3;
  idx_PedidosProveedor_DetallesREFERENCIA = 4;
  idx_PedidosProveedor_DetallesID_ARTICULO = 5;
  idx_PedidosProveedor_DetallesCONCEPTO = 6;
  idx_PedidosProveedor_DetallesCANTIDAD = 7;
  idx_PedidosProveedor_DetallesIMPORTE_UNIDAD = 8;
  idx_PedidosProveedor_DetallesIMPORTE_TOTAL = 9;
  idx_PedidosProveedor_DetallesDESCUENTO = 10;
  idx_PedidosProveedor_DetallesIMPORTE_PORTE = 11;
  idx_PedidosProveedor_DetallesVISIBLE = 12;
  idx_PedidosProveedor_DetallesREFERENCIA_PROVEEDOR = 13;

  { PedidosProveedor_Detalles_Refresh fields }
  fld_PedidosProveedor_Detalles_RefreshID = 'ID';
  fld_PedidosProveedor_Detalles_RefreshID_PEDIDO = 'ID_PEDIDO';
  fld_PedidosProveedor_Detalles_RefreshPOSICION = 'POSICION';
  fld_PedidosProveedor_Detalles_RefreshTIPO_DETALLE = 'TIPO_DETALLE';
  fld_PedidosProveedor_Detalles_RefreshREFERENCIA = 'REFERENCIA';
  fld_PedidosProveedor_Detalles_RefreshID_ARTICULO = 'ID_ARTICULO';
  fld_PedidosProveedor_Detalles_RefreshCONCEPTO = 'CONCEPTO';
  fld_PedidosProveedor_Detalles_RefreshCANTIDAD = 'CANTIDAD';
  fld_PedidosProveedor_Detalles_RefreshIMPORTE_UNIDAD = 'IMPORTE_UNIDAD';
  fld_PedidosProveedor_Detalles_RefreshIMPORTE_TOTAL = 'IMPORTE_TOTAL';
  fld_PedidosProveedor_Detalles_RefreshDESCUENTO = 'DESCUENTO';
  fld_PedidosProveedor_Detalles_RefreshIMPORTE_PORTE = 'IMPORTE_PORTE';
  fld_PedidosProveedor_Detalles_RefreshVISIBLE = 'VISIBLE';
  fld_PedidosProveedor_Detalles_RefreshREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';

  { PedidosProveedor_Detalles_Refresh field indexes }
  idx_PedidosProveedor_Detalles_RefreshID = 0;
  idx_PedidosProveedor_Detalles_RefreshID_PEDIDO = 1;
  idx_PedidosProveedor_Detalles_RefreshPOSICION = 2;
  idx_PedidosProveedor_Detalles_RefreshTIPO_DETALLE = 3;
  idx_PedidosProveedor_Detalles_RefreshREFERENCIA = 4;
  idx_PedidosProveedor_Detalles_RefreshID_ARTICULO = 5;
  idx_PedidosProveedor_Detalles_RefreshCONCEPTO = 6;
  idx_PedidosProveedor_Detalles_RefreshCANTIDAD = 7;
  idx_PedidosProveedor_Detalles_RefreshIMPORTE_UNIDAD = 8;
  idx_PedidosProveedor_Detalles_RefreshIMPORTE_TOTAL = 9;
  idx_PedidosProveedor_Detalles_RefreshDESCUENTO = 10;
  idx_PedidosProveedor_Detalles_RefreshIMPORTE_PORTE = 11;
  idx_PedidosProveedor_Detalles_RefreshVISIBLE = 12;
  idx_PedidosProveedor_Detalles_RefreshREFERENCIA_PROVEEDOR = 13;

  { PedidosProveedor_Refresh fields }
  fld_PedidosProveedor_RefreshID = 'ID';
  fld_PedidosProveedor_RefreshID_EMPRESA = 'ID_EMPRESA';
  fld_PedidosProveedor_RefreshID_PROVEEDOR = 'ID_PROVEEDOR';
  fld_PedidosProveedor_RefreshNOMBRE = 'NOMBRE';
  fld_PedidosProveedor_RefreshREFERENCIA = 'REFERENCIA';
  fld_PedidosProveedor_RefreshSITUACION = 'SITUACION';
  fld_PedidosProveedor_RefreshFECHA_ENVIO = 'FECHA_ENVIO';
  fld_PedidosProveedor_RefreshFECHA_PEDIDO = 'FECHA_PEDIDO';
  fld_PedidosProveedor_RefreshFECHA_CONFIRMACION = 'FECHA_CONFIRMACION';
  fld_PedidosProveedor_RefreshFECHA_ENTREGA = 'FECHA_ENTREGA';
  fld_PedidosProveedor_RefreshID_ALMACEN = 'ID_ALMACEN';
  fld_PedidosProveedor_RefreshNOMBRE_ALMACEN = 'NOMBRE_ALMACEN';
  fld_PedidosProveedor_RefreshOBSERVACIONES = 'OBSERVACIONES';
  fld_PedidosProveedor_RefreshIMPORTE_TOTAL = 'IMPORTE_TOTAL';
  fld_PedidosProveedor_RefreshINCIDENCIAS = 'INCIDENCIAS';
  fld_PedidosProveedor_RefreshINCIDENCIAS_ACTIVAS = 'INCIDENCIAS_ACTIVAS';
  fld_PedidosProveedor_RefreshCALLE = 'CALLE';
  fld_PedidosProveedor_RefreshPOBLACION = 'POBLACION';
  fld_PedidosProveedor_RefreshPROVINCIA = 'PROVINCIA';
  fld_PedidosProveedor_RefreshCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_PedidosProveedor_RefreshPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_PedidosProveedor_RefreshTELEFONO = 'TELEFONO';
  fld_PedidosProveedor_RefreshFECHA_ALTA = 'FECHA_ALTA';
  fld_PedidosProveedor_RefreshFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_PedidosProveedor_RefreshUSUARIO = 'USUARIO';
  fld_PedidosProveedor_RefreshID_PEDIDO_CLIENTE = 'ID_PEDIDO_CLIENTE';
  fld_PedidosProveedor_RefreshREF_PED_CLIENTE = 'REF_PED_CLIENTE';
  fld_PedidosProveedor_RefreshIMPORTE_NETO = 'IMPORTE_NETO';
  fld_PedidosProveedor_RefreshIMPORTE_PORTE = 'IMPORTE_PORTE';
  fld_PedidosProveedor_RefreshDESCUENTO = 'DESCUENTO';
  fld_PedidosProveedor_RefreshIMPORTE_DESCUENTO = 'IMPORTE_DESCUENTO';
  fld_PedidosProveedor_RefreshBASE_IMPONIBLE = 'BASE_IMPONIBLE';
  fld_PedidosProveedor_RefreshIVA = 'IVA';
  fld_PedidosProveedor_RefreshIMPORTE_IVA = 'IMPORTE_IVA';
  fld_PedidosProveedor_RefreshID_FORMA_PAGO = 'ID_FORMA_PAGO';

  { PedidosProveedor_Refresh field indexes }
  idx_PedidosProveedor_RefreshID = 0;
  idx_PedidosProveedor_RefreshID_EMPRESA = 1;
  idx_PedidosProveedor_RefreshID_PROVEEDOR = 2;
  idx_PedidosProveedor_RefreshNOMBRE = 3;
  idx_PedidosProveedor_RefreshREFERENCIA = 4;
  idx_PedidosProveedor_RefreshSITUACION = 5;
  idx_PedidosProveedor_RefreshFECHA_ENVIO = 6;
  idx_PedidosProveedor_RefreshFECHA_PEDIDO = 7;
  idx_PedidosProveedor_RefreshFECHA_CONFIRMACION = 8;
  idx_PedidosProveedor_RefreshFECHA_ENTREGA = 9;
  idx_PedidosProveedor_RefreshID_ALMACEN = 10;
  idx_PedidosProveedor_RefreshNOMBRE_ALMACEN = 11;
  idx_PedidosProveedor_RefreshOBSERVACIONES = 12;
  idx_PedidosProveedor_RefreshIMPORTE_TOTAL = 13;
  idx_PedidosProveedor_RefreshINCIDENCIAS = 14;
  idx_PedidosProveedor_RefreshINCIDENCIAS_ACTIVAS = 15;
  idx_PedidosProveedor_RefreshCALLE = 16;
  idx_PedidosProveedor_RefreshPOBLACION = 17;
  idx_PedidosProveedor_RefreshPROVINCIA = 18;
  idx_PedidosProveedor_RefreshCODIGO_POSTAL = 19;
  idx_PedidosProveedor_RefreshPERSONA_CONTACTO = 20;
  idx_PedidosProveedor_RefreshTELEFONO = 21;
  idx_PedidosProveedor_RefreshFECHA_ALTA = 22;
  idx_PedidosProveedor_RefreshFECHA_MODIFICACION = 23;
  idx_PedidosProveedor_RefreshUSUARIO = 24;
  idx_PedidosProveedor_RefreshID_PEDIDO_CLIENTE = 25;
  idx_PedidosProveedor_RefreshREF_PED_CLIENTE = 26;
  idx_PedidosProveedor_RefreshIMPORTE_NETO = 27;
  idx_PedidosProveedor_RefreshIMPORTE_PORTE = 28;
  idx_PedidosProveedor_RefreshDESCUENTO = 29;
  idx_PedidosProveedor_RefreshIMPORTE_DESCUENTO = 30;
  idx_PedidosProveedor_RefreshBASE_IMPONIBLE = 31;
  idx_PedidosProveedor_RefreshIVA = 32;
  idx_PedidosProveedor_RefreshIMPORTE_IVA = 33;
  idx_PedidosProveedor_RefreshID_FORMA_PAGO = 34;

  { PedidosProveedor_Articulos_Pendientes fields }
  fld_PedidosProveedor_Articulos_PendientesID_PEDIDO = 'ID_PEDIDO';
  fld_PedidosProveedor_Articulos_PendientesREFERENCIA = 'REFERENCIA';
  fld_PedidosProveedor_Articulos_PendientesID_ARTICULO = 'ID_ARTICULO';
  fld_PedidosProveedor_Articulos_PendientesCONCEPTO = 'CONCEPTO';
  fld_PedidosProveedor_Articulos_PendientesCANTIDAD = 'CANTIDAD';
  fld_PedidosProveedor_Articulos_PendientesREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';

  { PedidosProveedor_Articulos_Pendientes field indexes }
  idx_PedidosProveedor_Articulos_PendientesID_PEDIDO = 0;
  idx_PedidosProveedor_Articulos_PendientesREFERENCIA = 1;
  idx_PedidosProveedor_Articulos_PendientesID_ARTICULO = 2;
  idx_PedidosProveedor_Articulos_PendientesCONCEPTO = 3;
  idx_PedidosProveedor_Articulos_PendientesCANTIDAD = 4;
  idx_PedidosProveedor_Articulos_PendientesREFERENCIA_PROVEEDOR = 5;

type
  { IDarReferencia }
  IDarReferencia = interface(IDAStronglyTypedDataTable)
  ['{9854A0CD-0C0C-4D9A-958B-81ED1FC86AC3}']
    { Property getters and setters }
    function GetVALORValue: String;
    procedure SetVALORValue(const aValue: String);


    { Properties }
    property VALOR: String read GetVALORValue write SetVALORValue;
  end;

  { TDarReferenciaDataTableRules }
  TDarReferenciaDataTableRules = class(TDADataTableRules, IDarReferencia)
  private
  protected
    { Property getters and setters }
    function GetVALORValue: String; virtual;
    procedure SetVALORValue(const aValue: String); virtual;

    { Properties }
    property VALOR: String read GetVALORValue write SetVALORValue;

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

  end;

  { IPedidosProveedor }
  IPedidosProveedor = interface(IDAStronglyTypedDataTable)
  ['{AFABA977-8E05-489D-A958-87E26AF68CB3}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_PROVEEDORValue: Integer;
    procedure SetID_PROVEEDORValue(const aValue: Integer);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetSITUACIONValue: String;
    procedure SetSITUACIONValue(const aValue: String);
    function GetFECHA_ENVIOValue: DateTime;
    procedure SetFECHA_ENVIOValue(const aValue: DateTime);
    function GetFECHA_PEDIDOValue: DateTime;
    procedure SetFECHA_PEDIDOValue(const aValue: DateTime);
    function GetFECHA_CONFIRMACIONValue: DateTime;
    procedure SetFECHA_CONFIRMACIONValue(const aValue: DateTime);
    function GetFECHA_ENTREGAValue: DateTime;
    procedure SetFECHA_ENTREGAValue(const aValue: DateTime);
    function GetID_ALMACENValue: Integer;
    procedure SetID_ALMACENValue(const aValue: Integer);
    function GetNOMBRE_ALMACENValue: String;
    procedure SetNOMBRE_ALMACENValue(const aValue: String);
    function GetOBSERVACIONESValue: IROStrings;
    procedure SetOBSERVACIONESValue(const aValue: IROStrings);
    function GetIMPORTE_TOTALValue: Currency;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency);
    function GetINCIDENCIASValue: IROStrings;
    procedure SetINCIDENCIASValue(const aValue: IROStrings);
    function GetINCIDENCIAS_ACTIVASValue: Integer;
    procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetTELEFONOValue: String;
    procedure SetTELEFONOValue(const aValue: String);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetID_PEDIDO_CLIENTEValue: Integer;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
    function GetREF_PED_CLIENTEValue: String;
    procedure SetREF_PED_CLIENTEValue(const aValue: String);
    function GetIMPORTE_NETOValue: Currency;
    procedure SetIMPORTE_NETOValue(const aValue: Currency);
    function GetIMPORTE_PORTEValue: Currency;
    procedure SetIMPORTE_PORTEValue(const aValue: Currency);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetIMPORTE_DESCUENTOValue: Currency;
    procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency);
    function GetBASE_IMPONIBLEValue: Currency;
    procedure SetBASE_IMPONIBLEValue(const aValue: Currency);
    function GetIVAValue: Float;
    procedure SetIVAValue(const aValue: Float);
    function GetIMPORTE_IVAValue: Currency;
    procedure SetIMPORTE_IVAValue(const aValue: Currency);
    function GetID_FORMA_PAGOValue: Integer;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
    property FECHA_ENVIO: DateTime read GetFECHA_ENVIOValue write SetFECHA_ENVIOValue;
    property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
    property FECHA_CONFIRMACION: DateTime read GetFECHA_CONFIRMACIONValue write SetFECHA_CONFIRMACIONValue;
    property FECHA_ENTREGA: DateTime read GetFECHA_ENTREGAValue write SetFECHA_ENTREGAValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue;
    property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property INCIDENCIAS: IROStrings read GetINCIDENCIASValue write SetINCIDENCIASValue;
    property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REF_PED_CLIENTE: String read GetREF_PED_CLIENTEValue write SetREF_PED_CLIENTEValue;
    property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
    property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
    property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
    property IVA: Float read GetIVAValue write SetIVAValue;
    property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
  end;

  { TPedidosProveedorDataTableRules }
  TPedidosProveedorDataTableRules = class(TDADataTableRules, IPedidosProveedor)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetSITUACIONValue: String; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    function GetFECHA_ENVIOValue: DateTime; virtual;
    procedure SetFECHA_ENVIOValue(const aValue: DateTime); virtual;
    function GetFECHA_PEDIDOValue: DateTime; virtual;
    procedure SetFECHA_PEDIDOValue(const aValue: DateTime); virtual;
    function GetFECHA_CONFIRMACIONValue: DateTime; virtual;
    procedure SetFECHA_CONFIRMACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_ENTREGAValue: DateTime; virtual;
    procedure SetFECHA_ENTREGAValue(const aValue: DateTime); virtual;
    function GetID_ALMACENValue: Integer; virtual;
    procedure SetID_ALMACENValue(const aValue: Integer); virtual;
    function GetNOMBRE_ALMACENValue: String; virtual;
    procedure SetNOMBRE_ALMACENValue(const aValue: String); virtual;
    function GetOBSERVACIONESValue: IROStrings; virtual;
    procedure SetOBSERVACIONESValue(const aValue: IROStrings); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    function GetINCIDENCIASValue: IROStrings; virtual;
    procedure SetINCIDENCIASValue(const aValue: IROStrings); virtual;
    function GetINCIDENCIAS_ACTIVASValue: Integer; virtual;
    procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetTELEFONOValue: String; virtual;
    procedure SetTELEFONOValue(const aValue: String); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetID_PEDIDO_CLIENTEValue: Integer; virtual;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer); virtual;
    function GetREF_PED_CLIENTEValue: String; virtual;
    procedure SetREF_PED_CLIENTEValue(const aValue: String); virtual;
    function GetIMPORTE_NETOValue: Currency; virtual;
    procedure SetIMPORTE_NETOValue(const aValue: Currency); virtual;
    function GetIMPORTE_PORTEValue: Currency; virtual;
    procedure SetIMPORTE_PORTEValue(const aValue: Currency); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetIMPORTE_DESCUENTOValue: Currency; virtual;
    procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency); virtual;
    function GetBASE_IMPONIBLEValue: Currency; virtual;
    procedure SetBASE_IMPONIBLEValue(const aValue: Currency); virtual;
    function GetIVAValue: Float; virtual;
    procedure SetIVAValue(const aValue: Float); virtual;
    function GetIMPORTE_IVAValue: Currency; virtual;
    procedure SetIMPORTE_IVAValue(const aValue: Currency); virtual;
    function GetID_FORMA_PAGOValue: Integer; virtual;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
    property FECHA_ENVIO: DateTime read GetFECHA_ENVIOValue write SetFECHA_ENVIOValue;
    property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
    property FECHA_CONFIRMACION: DateTime read GetFECHA_CONFIRMACIONValue write SetFECHA_CONFIRMACIONValue;
    property FECHA_ENTREGA: DateTime read GetFECHA_ENTREGAValue write SetFECHA_ENTREGAValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue;
    property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property INCIDENCIAS: IROStrings read GetINCIDENCIASValue write SetINCIDENCIASValue;
    property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REF_PED_CLIENTE: String read GetREF_PED_CLIENTEValue write SetREF_PED_CLIENTEValue;
    property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
    property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
    property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
    property IVA: Float read GetIVAValue write SetIVAValue;
    property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;

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

  end;

  { IPedidosProveedor_Detalles }
  IPedidosProveedor_Detalles = interface(IDAStronglyTypedDataTable)
  ['{DF7DB57B-BCA8-42B8-91A3-8850DE614323}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_PEDIDOValue: Integer;
    procedure SetID_PEDIDOValue(const aValue: Integer);
    function GetPOSICIONValue: Integer;
    procedure SetPOSICIONValue(const aValue: Integer);
    function GetTIPO_DETALLEValue: String;
    procedure SetTIPO_DETALLEValue(const aValue: String);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetCONCEPTOValue: String;
    procedure SetCONCEPTOValue(const aValue: String);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetIMPORTE_UNIDADValue: Float;
    procedure SetIMPORTE_UNIDADValue(const aValue: Float);
    function GetIMPORTE_TOTALValue: Float;
    procedure SetIMPORTE_TOTALValue(const aValue: Float);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetIMPORTE_PORTEValue: Float;
    procedure SetIMPORTE_PORTEValue(const aValue: Float);
    function GetVISIBLEValue: Integer;
    procedure SetVISIBLEValue(const aValue: Integer);
    function GetREFERENCIA_PROVEEDORValue: String;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
    property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD: Float read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
    property IMPORTE_TOTAL: Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_PORTE: Float read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
  end;

  { TPedidosProveedor_DetallesDataTableRules }
  TPedidosProveedor_DetallesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Detalles)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_PEDIDOValue: Integer; virtual;
    procedure SetID_PEDIDOValue(const aValue: Integer); virtual;
    function GetPOSICIONValue: Integer; virtual;
    procedure SetPOSICIONValue(const aValue: Integer); virtual;
    function GetTIPO_DETALLEValue: String; virtual;
    procedure SetTIPO_DETALLEValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetCONCEPTOValue: String; virtual;
    procedure SetCONCEPTOValue(const aValue: String); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetIMPORTE_UNIDADValue: Float; virtual;
    procedure SetIMPORTE_UNIDADValue(const aValue: Float); virtual;
    function GetIMPORTE_TOTALValue: Float; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Float); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetIMPORTE_PORTEValue: Float; virtual;
    procedure SetIMPORTE_PORTEValue(const aValue: Float); virtual;
    function GetVISIBLEValue: Integer; virtual;
    procedure SetVISIBLEValue(const aValue: Integer); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
    property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD: Float read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
    property IMPORTE_TOTAL: Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_PORTE: Float read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;

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

  end;

  { IPedidosProveedor_Detalles_Refresh }
  IPedidosProveedor_Detalles_Refresh = interface(IDAStronglyTypedDataTable)
  ['{7E802AB3-A1DE-4C21-94ED-AE02E2AF26E2}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_PEDIDOValue: Integer;
    procedure SetID_PEDIDOValue(const aValue: Integer);
    function GetPOSICIONValue: Integer;
    procedure SetPOSICIONValue(const aValue: Integer);
    function GetTIPO_DETALLEValue: String;
    procedure SetTIPO_DETALLEValue(const aValue: String);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetCONCEPTOValue: String;
    procedure SetCONCEPTOValue(const aValue: String);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetIMPORTE_UNIDADValue: Float;
    procedure SetIMPORTE_UNIDADValue(const aValue: Float);
    function GetIMPORTE_TOTALValue: Float;
    procedure SetIMPORTE_TOTALValue(const aValue: Float);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetIMPORTE_PORTEValue: Float;
    procedure SetIMPORTE_PORTEValue(const aValue: Float);
    function GetVISIBLEValue: Integer;
    procedure SetVISIBLEValue(const aValue: Integer);
    function GetREFERENCIA_PROVEEDORValue: String;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
    property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD: Float read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
    property IMPORTE_TOTAL: Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_PORTE: Float read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
  end;

  { TPedidosProveedor_Detalles_RefreshDataTableRules }
  TPedidosProveedor_Detalles_RefreshDataTableRules = class(TDADataTableRules, IPedidosProveedor_Detalles_Refresh)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_PEDIDOValue: Integer; virtual;
    procedure SetID_PEDIDOValue(const aValue: Integer); virtual;
    function GetPOSICIONValue: Integer; virtual;
    procedure SetPOSICIONValue(const aValue: Integer); virtual;
    function GetTIPO_DETALLEValue: String; virtual;
    procedure SetTIPO_DETALLEValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetCONCEPTOValue: String; virtual;
    procedure SetCONCEPTOValue(const aValue: String); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetIMPORTE_UNIDADValue: Float; virtual;
    procedure SetIMPORTE_UNIDADValue(const aValue: Float); virtual;
    function GetIMPORTE_TOTALValue: Float; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Float); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetIMPORTE_PORTEValue: Float; virtual;
    procedure SetIMPORTE_PORTEValue(const aValue: Float); virtual;
    function GetVISIBLEValue: Integer; virtual;
    procedure SetVISIBLEValue(const aValue: Integer); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property POSICION: Integer read GetPOSICIONValue write SetPOSICIONValue;
    property TIPO_DETALLE: String read GetTIPO_DETALLEValue write SetTIPO_DETALLEValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property IMPORTE_UNIDAD: Float read GetIMPORTE_UNIDADValue write SetIMPORTE_UNIDADValue;
    property IMPORTE_TOTAL: Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_PORTE: Float read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property VISIBLE: Integer read GetVISIBLEValue write SetVISIBLEValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;

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

  end;

  { IPedidosProveedor_Refresh }
  IPedidosProveedor_Refresh = interface(IDAStronglyTypedDataTable)
  ['{76FCFAB7-76E6-4AF5-900F-CA7FA8CBFCB8}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_PROVEEDORValue: Integer;
    procedure SetID_PROVEEDORValue(const aValue: Integer);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetSITUACIONValue: String;
    procedure SetSITUACIONValue(const aValue: String);
    function GetFECHA_ENVIOValue: DateTime;
    procedure SetFECHA_ENVIOValue(const aValue: DateTime);
    function GetFECHA_PEDIDOValue: DateTime;
    procedure SetFECHA_PEDIDOValue(const aValue: DateTime);
    function GetFECHA_CONFIRMACIONValue: DateTime;
    procedure SetFECHA_CONFIRMACIONValue(const aValue: DateTime);
    function GetFECHA_ENTREGAValue: DateTime;
    procedure SetFECHA_ENTREGAValue(const aValue: DateTime);
    function GetID_ALMACENValue: Integer;
    procedure SetID_ALMACENValue(const aValue: Integer);
    function GetNOMBRE_ALMACENValue: String;
    procedure SetNOMBRE_ALMACENValue(const aValue: String);
    function GetOBSERVACIONESValue: IROStrings;
    procedure SetOBSERVACIONESValue(const aValue: IROStrings);
    function GetIMPORTE_TOTALValue: Currency;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency);
    function GetINCIDENCIASValue: IROStrings;
    procedure SetINCIDENCIASValue(const aValue: IROStrings);
    function GetINCIDENCIAS_ACTIVASValue: Integer;
    procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetTELEFONOValue: String;
    procedure SetTELEFONOValue(const aValue: String);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetID_PEDIDO_CLIENTEValue: Integer;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
    function GetREF_PED_CLIENTEValue: String;
    procedure SetREF_PED_CLIENTEValue(const aValue: String);
    function GetIMPORTE_NETOValue: Currency;
    procedure SetIMPORTE_NETOValue(const aValue: Currency);
    function GetIMPORTE_PORTEValue: Currency;
    procedure SetIMPORTE_PORTEValue(const aValue: Currency);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetIMPORTE_DESCUENTOValue: Currency;
    procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency);
    function GetBASE_IMPONIBLEValue: Currency;
    procedure SetBASE_IMPONIBLEValue(const aValue: Currency);
    function GetIVAValue: Float;
    procedure SetIVAValue(const aValue: Float);
    function GetIMPORTE_IVAValue: Currency;
    procedure SetIMPORTE_IVAValue(const aValue: Currency);
    function GetID_FORMA_PAGOValue: Integer;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
    property FECHA_ENVIO: DateTime read GetFECHA_ENVIOValue write SetFECHA_ENVIOValue;
    property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
    property FECHA_CONFIRMACION: DateTime read GetFECHA_CONFIRMACIONValue write SetFECHA_CONFIRMACIONValue;
    property FECHA_ENTREGA: DateTime read GetFECHA_ENTREGAValue write SetFECHA_ENTREGAValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue;
    property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property INCIDENCIAS: IROStrings read GetINCIDENCIASValue write SetINCIDENCIASValue;
    property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REF_PED_CLIENTE: String read GetREF_PED_CLIENTEValue write SetREF_PED_CLIENTEValue;
    property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
    property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
    property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
    property IVA: Float read GetIVAValue write SetIVAValue;
    property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
  end;

  { TPedidosProveedor_RefreshDataTableRules }
  TPedidosProveedor_RefreshDataTableRules = class(TDADataTableRules, IPedidosProveedor_Refresh)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetSITUACIONValue: String; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    function GetFECHA_ENVIOValue: DateTime; virtual;
    procedure SetFECHA_ENVIOValue(const aValue: DateTime); virtual;
    function GetFECHA_PEDIDOValue: DateTime; virtual;
    procedure SetFECHA_PEDIDOValue(const aValue: DateTime); virtual;
    function GetFECHA_CONFIRMACIONValue: DateTime; virtual;
    procedure SetFECHA_CONFIRMACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_ENTREGAValue: DateTime; virtual;
    procedure SetFECHA_ENTREGAValue(const aValue: DateTime); virtual;
    function GetID_ALMACENValue: Integer; virtual;
    procedure SetID_ALMACENValue(const aValue: Integer); virtual;
    function GetNOMBRE_ALMACENValue: String; virtual;
    procedure SetNOMBRE_ALMACENValue(const aValue: String); virtual;
    function GetOBSERVACIONESValue: IROStrings; virtual;
    procedure SetOBSERVACIONESValue(const aValue: IROStrings); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    function GetINCIDENCIASValue: IROStrings; virtual;
    procedure SetINCIDENCIASValue(const aValue: IROStrings); virtual;
    function GetINCIDENCIAS_ACTIVASValue: Integer; virtual;
    procedure SetINCIDENCIAS_ACTIVASValue(const aValue: Integer); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetTELEFONOValue: String; virtual;
    procedure SetTELEFONOValue(const aValue: String); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetID_PEDIDO_CLIENTEValue: Integer; virtual;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer); virtual;
    function GetREF_PED_CLIENTEValue: String; virtual;
    procedure SetREF_PED_CLIENTEValue(const aValue: String); virtual;
    function GetIMPORTE_NETOValue: Currency; virtual;
    procedure SetIMPORTE_NETOValue(const aValue: Currency); virtual;
    function GetIMPORTE_PORTEValue: Currency; virtual;
    procedure SetIMPORTE_PORTEValue(const aValue: Currency); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetIMPORTE_DESCUENTOValue: Currency; virtual;
    procedure SetIMPORTE_DESCUENTOValue(const aValue: Currency); virtual;
    function GetBASE_IMPONIBLEValue: Currency; virtual;
    procedure SetBASE_IMPONIBLEValue(const aValue: Currency); virtual;
    function GetIVAValue: Float; virtual;
    procedure SetIVAValue(const aValue: Float); virtual;
    function GetIMPORTE_IVAValue: Currency; virtual;
    procedure SetIMPORTE_IVAValue(const aValue: Currency); virtual;
    function GetID_FORMA_PAGOValue: Integer; virtual;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
    property FECHA_ENVIO: DateTime read GetFECHA_ENVIOValue write SetFECHA_ENVIOValue;
    property FECHA_PEDIDO: DateTime read GetFECHA_PEDIDOValue write SetFECHA_PEDIDOValue;
    property FECHA_CONFIRMACION: DateTime read GetFECHA_CONFIRMACIONValue write SetFECHA_CONFIRMACIONValue;
    property FECHA_ENTREGA: DateTime read GetFECHA_ENTREGAValue write SetFECHA_ENTREGAValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue;
    property OBSERVACIONES: IROStrings read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property IMPORTE_TOTAL: Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property INCIDENCIAS: IROStrings read GetINCIDENCIASValue write SetINCIDENCIASValue;
    property INCIDENCIAS_ACTIVAS: Integer read GetINCIDENCIAS_ACTIVASValue write SetINCIDENCIAS_ACTIVASValue;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REF_PED_CLIENTE: String read GetREF_PED_CLIENTEValue write SetREF_PED_CLIENTEValue;
    property IMPORTE_NETO: Currency read GetIMPORTE_NETOValue write SetIMPORTE_NETOValue;
    property IMPORTE_PORTE: Currency read GetIMPORTE_PORTEValue write SetIMPORTE_PORTEValue;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property IMPORTE_DESCUENTO: Currency read GetIMPORTE_DESCUENTOValue write SetIMPORTE_DESCUENTOValue;
    property BASE_IMPONIBLE: Currency read GetBASE_IMPONIBLEValue write SetBASE_IMPONIBLEValue;
    property IVA: Float read GetIVAValue write SetIVAValue;
    property IMPORTE_IVA: Currency read GetIMPORTE_IVAValue write SetIMPORTE_IVAValue;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;

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

  end;

  { IPedidosProveedor_Articulos_Pendientes }
  IPedidosProveedor_Articulos_Pendientes = interface(IDAStronglyTypedDataTable)
  ['{E563C62D-7EFC-4215-AB53-8BAECD65B2A1}']
    { Property getters and setters }
    function GetID_PEDIDOValue: Integer;
    procedure SetID_PEDIDOValue(const aValue: Integer);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetCONCEPTOValue: String;
    procedure SetCONCEPTOValue(const aValue: String);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetREFERENCIA_PROVEEDORValue: String;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);


    { Properties }
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
  end;

  { TPedidosProveedor_Articulos_PendientesDataTableRules }
  TPedidosProveedor_Articulos_PendientesDataTableRules = class(TDADataTableRules, IPedidosProveedor_Articulos_Pendientes)
  private
  protected
    { Property getters and setters }
    function GetID_PEDIDOValue: Integer; virtual;
    procedure SetID_PEDIDOValue(const aValue: Integer); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetCONCEPTOValue: String; virtual;
    procedure SetCONCEPTOValue(const aValue: String); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;

    { Properties }
    property ID_PEDIDO: Integer read GetID_PEDIDOValue write SetID_PEDIDOValue;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CONCEPTO: String read GetCONCEPTOValue write SetCONCEPTOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;

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

  end;

implementation

uses Variants;

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

destructor TDarReferenciaDataTableRules.Destroy;
begin
  inherited;
end;

function TDarReferenciaDataTableRules.GetVALORValue: String;
begin
  result := DataTable.Fields[idx_DarReferenciaVALOR].AsString;
end;

procedure TDarReferenciaDataTableRules.SetVALORValue(const aValue: String);
begin
  DataTable.Fields[idx_DarReferenciaVALOR].AsString := aValue;
end;


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

destructor TPedidosProveedorDataTableRules.Destroy;
begin
  inherited;
end;

function TPedidosProveedorDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID].AsInteger;
end;

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

function TPedidosProveedorDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID_EMPRESA].AsInteger;
end;

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

function TPedidosProveedorDataTableRules.GetID_PROVEEDORValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID_PROVEEDOR].AsInteger;
end;

procedure TPedidosProveedorDataTableRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedorID_PROVEEDOR].AsInteger := aValue;
end;

function TPedidosProveedorDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorNOMBRE].AsString;
end;

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

function TPedidosProveedorDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorREFERENCIA].AsString;
end;

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

function TPedidosProveedorDataTableRules.GetSITUACIONValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorSITUACION].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetSITUACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorSITUACION].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetFECHA_ENVIOValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_ENVIO].AsDateTime;
end;

procedure TPedidosProveedorDataTableRules.SetFECHA_ENVIOValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedorFECHA_ENVIO].AsDateTime := aValue;
end;

function TPedidosProveedorDataTableRules.GetFECHA_PEDIDOValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_PEDIDO].AsDateTime;
end;

procedure TPedidosProveedorDataTableRules.SetFECHA_PEDIDOValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedorFECHA_PEDIDO].AsDateTime := aValue;
end;

function TPedidosProveedorDataTableRules.GetFECHA_CONFIRMACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_CONFIRMACION].AsDateTime;
end;

procedure TPedidosProveedorDataTableRules.SetFECHA_CONFIRMACIONValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedorFECHA_CONFIRMACION].AsDateTime := aValue;
end;

function TPedidosProveedorDataTableRules.GetFECHA_ENTREGAValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_ENTREGA].AsDateTime;
end;

procedure TPedidosProveedorDataTableRules.SetFECHA_ENTREGAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedorFECHA_ENTREGA].AsDateTime := aValue;
end;

function TPedidosProveedorDataTableRules.GetID_ALMACENValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID_ALMACEN].AsInteger;
end;

procedure TPedidosProveedorDataTableRules.SetID_ALMACENValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedorID_ALMACEN].AsInteger := aValue;
end;

function TPedidosProveedorDataTableRules.GetNOMBRE_ALMACENValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorNOMBRE_ALMACEN].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetNOMBRE_ALMACENValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorNOMBRE_ALMACEN].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetOBSERVACIONESValue: IROStrings;
begin
  result := NewROStrings();
  result.Text := DataTable.Fields[idx_PedidosProveedorOBSERVACIONES].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetOBSERVACIONESValue(const aValue: IROStrings);
begin
  DataTable.Fields[idx_PedidosProveedorOBSERVACIONES].AsString := aValue.Text;
end;

function TPedidosProveedorDataTableRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorIMPORTE_TOTAL].AsCurrency;
end;

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

function TPedidosProveedorDataTableRules.GetINCIDENCIASValue: IROStrings;
begin
  result := NewROStrings();
  result.Text := DataTable.Fields[idx_PedidosProveedorINCIDENCIAS].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetINCIDENCIASValue(const aValue: IROStrings);
begin
  DataTable.Fields[idx_PedidosProveedorINCIDENCIAS].AsString := aValue.Text;
end;

function TPedidosProveedorDataTableRules.GetINCIDENCIAS_ACTIVASValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorINCIDENCIAS_ACTIVAS].AsInteger;
end;

procedure TPedidosProveedorDataTableRules.SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedorINCIDENCIAS_ACTIVAS].AsInteger := aValue;
end;

function TPedidosProveedorDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorCALLE].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetCALLEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorCALLE].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorPOBLACION].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetPOBLACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorPOBLACION].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorPROVINCIA].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetPROVINCIAValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorPROVINCIA].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorCODIGO_POSTAL].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetCODIGO_POSTALValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorCODIGO_POSTAL].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorPERSONA_CONTACTO].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetPERSONA_CONTACTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorPERSONA_CONTACTO].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetTELEFONOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorTELEFONO].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetTELEFONOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorTELEFONO].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_ALTA].AsDateTime;
end;

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

function TPedidosProveedorDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedorFECHA_MODIFICACION].AsDateTime;
end;

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

function TPedidosProveedorDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorUSUARIO].AsString;
end;

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

function TPedidosProveedorDataTableRules.GetID_PEDIDO_CLIENTEValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID_PEDIDO_CLIENTE].AsInteger;
end;

procedure TPedidosProveedorDataTableRules.SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedorID_PEDIDO_CLIENTE].AsInteger := aValue;
end;

function TPedidosProveedorDataTableRules.GetREF_PED_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedorREF_PED_CLIENTE].AsString;
end;

procedure TPedidosProveedorDataTableRules.SetREF_PED_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedorREF_PED_CLIENTE].AsString := aValue;
end;

function TPedidosProveedorDataTableRules.GetIMPORTE_NETOValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorIMPORTE_NETO].AsCurrency;
end;

procedure TPedidosProveedorDataTableRules.SetIMPORTE_NETOValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedorIMPORTE_NETO].AsCurrency := aValue;
end;

function TPedidosProveedorDataTableRules.GetIMPORTE_PORTEValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorIMPORTE_PORTE].AsCurrency;
end;

procedure TPedidosProveedorDataTableRules.SetIMPORTE_PORTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedorIMPORTE_PORTE].AsCurrency := aValue;
end;

function TPedidosProveedorDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedorDESCUENTO].AsFloat;
end;

procedure TPedidosProveedorDataTableRules.SetDESCUENTOValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedorDESCUENTO].AsFloat := aValue;
end;

function TPedidosProveedorDataTableRules.GetIMPORTE_DESCUENTOValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorIMPORTE_DESCUENTO].AsCurrency;
end;

procedure TPedidosProveedorDataTableRules.SetIMPORTE_DESCUENTOValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedorIMPORTE_DESCUENTO].AsCurrency := aValue;
end;

function TPedidosProveedorDataTableRules.GetBASE_IMPONIBLEValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorBASE_IMPONIBLE].AsCurrency;
end;

procedure TPedidosProveedorDataTableRules.SetBASE_IMPONIBLEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedorBASE_IMPONIBLE].AsCurrency := aValue;
end;

function TPedidosProveedorDataTableRules.GetIVAValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedorIVA].AsFloat;
end;

procedure TPedidosProveedorDataTableRules.SetIVAValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedorIVA].AsFloat := aValue;
end;

function TPedidosProveedorDataTableRules.GetIMPORTE_IVAValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedorIMPORTE_IVA].AsCurrency;
end;

procedure TPedidosProveedorDataTableRules.SetIMPORTE_IVAValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedorIMPORTE_IVA].AsCurrency := aValue;
end;

function TPedidosProveedorDataTableRules.GetID_FORMA_PAGOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedorID_FORMA_PAGO].AsInteger;
end;

procedure TPedidosProveedorDataTableRules.SetID_FORMA_PAGOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedorID_FORMA_PAGO].AsInteger := aValue;
end;


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

destructor TPedidosProveedor_DetallesDataTableRules.Destroy;
begin
  inherited;
end;

function TPedidosProveedor_DetallesDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesID].AsInteger;
end;

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

function TPedidosProveedor_DetallesDataTableRules.GetID_PEDIDOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesID_PEDIDO].AsInteger;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetID_PEDIDOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesID_PEDIDO].AsInteger := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetPOSICIONValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesPOSICION].AsInteger;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetPOSICIONValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesPOSICION].AsInteger := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetTIPO_DETALLEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesTIPO_DETALLE].AsString;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetTIPO_DETALLEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesTIPO_DETALLE].AsString := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesREFERENCIA].AsString;
end;

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

function TPedidosProveedor_DetallesDataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesID_ARTICULO].AsInteger;
end;

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

function TPedidosProveedor_DetallesDataTableRules.GetCONCEPTOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesCONCEPTO].AsString;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetCONCEPTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesCONCEPTO].AsString := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesCANTIDAD].AsInteger;
end;

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

function TPedidosProveedor_DetallesDataTableRules.GetIMPORTE_UNIDADValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_UNIDAD].AsFloat;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetIMPORTE_UNIDADValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_UNIDAD].AsFloat := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetIMPORTE_TOTALValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_TOTAL].AsFloat;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetIMPORTE_TOTALValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_TOTAL].AsFloat := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesDESCUENTO].AsFloat;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetDESCUENTOValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesDESCUENTO].AsFloat := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetIMPORTE_PORTEValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_PORTE].AsFloat;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetIMPORTE_PORTEValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesIMPORTE_PORTE].AsFloat := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetVISIBLEValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesVISIBLE].AsInteger;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetVISIBLEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesVISIBLE].AsInteger := aValue;
end;

function TPedidosProveedor_DetallesDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_DetallesREFERENCIA_PROVEEDOR].AsString;
end;

procedure TPedidosProveedor_DetallesDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_DetallesREFERENCIA_PROVEEDOR].AsString := aValue;
end;


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

destructor TPedidosProveedor_Detalles_RefreshDataTableRules.Destroy;
begin
  inherited;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshID].AsInteger;
end;

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

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetID_PEDIDOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshID_PEDIDO].AsInteger;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetID_PEDIDOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshID_PEDIDO].AsInteger := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetPOSICIONValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshPOSICION].AsInteger;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetPOSICIONValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshPOSICION].AsInteger := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetTIPO_DETALLEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshTIPO_DETALLE].AsString;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetTIPO_DETALLEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshTIPO_DETALLE].AsString := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshREFERENCIA].AsString;
end;

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

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshID_ARTICULO].AsInteger;
end;

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

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetCONCEPTOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshCONCEPTO].AsString;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetCONCEPTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshCONCEPTO].AsString := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshCANTIDAD].AsInteger;
end;

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

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetIMPORTE_UNIDADValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_UNIDAD].AsFloat;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetIMPORTE_UNIDADValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_UNIDAD].AsFloat := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetIMPORTE_TOTALValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_TOTAL].AsFloat;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetIMPORTE_TOTALValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_TOTAL].AsFloat := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshDESCUENTO].AsFloat;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetDESCUENTOValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshDESCUENTO].AsFloat := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetIMPORTE_PORTEValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_PORTE].AsFloat;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetIMPORTE_PORTEValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshIMPORTE_PORTE].AsFloat := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetVISIBLEValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshVISIBLE].AsInteger;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetVISIBLEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshVISIBLE].AsInteger := aValue;
end;

function TPedidosProveedor_Detalles_RefreshDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshREFERENCIA_PROVEEDOR].AsString;
end;

procedure TPedidosProveedor_Detalles_RefreshDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_Detalles_RefreshREFERENCIA_PROVEEDOR].AsString := aValue;
end;


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

destructor TPedidosProveedor_RefreshDataTableRules.Destroy;
begin
  inherited;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID].AsInteger;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID_EMPRESA].AsInteger;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetID_PROVEEDORValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID_PROVEEDOR].AsInteger;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshID_PROVEEDOR].AsInteger := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshNOMBRE].AsString;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshREFERENCIA].AsString;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetSITUACIONValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshSITUACION].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetSITUACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshSITUACION].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_ENVIOValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_ENVIO].AsDateTime;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetFECHA_ENVIOValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_ENVIO].AsDateTime := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_PEDIDOValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_PEDIDO].AsDateTime;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetFECHA_PEDIDOValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_PEDIDO].AsDateTime := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_CONFIRMACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_CONFIRMACION].AsDateTime;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetFECHA_CONFIRMACIONValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_CONFIRMACION].AsDateTime := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_ENTREGAValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_ENTREGA].AsDateTime;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetFECHA_ENTREGAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_ENTREGA].AsDateTime := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetID_ALMACENValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID_ALMACEN].AsInteger;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetID_ALMACENValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshID_ALMACEN].AsInteger := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetNOMBRE_ALMACENValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshNOMBRE_ALMACEN].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetNOMBRE_ALMACENValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshNOMBRE_ALMACEN].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetOBSERVACIONESValue: IROStrings;
begin
  result := NewROStrings();
  result.Text := DataTable.Fields[idx_PedidosProveedor_RefreshOBSERVACIONES].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetOBSERVACIONESValue(const aValue: IROStrings);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshOBSERVACIONES].AsString := aValue.Text;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_TOTAL].AsCurrency;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetINCIDENCIASValue: IROStrings;
begin
  result := NewROStrings();
  result.Text := DataTable.Fields[idx_PedidosProveedor_RefreshINCIDENCIAS].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetINCIDENCIASValue(const aValue: IROStrings);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshINCIDENCIAS].AsString := aValue.Text;
end;

function TPedidosProveedor_RefreshDataTableRules.GetINCIDENCIAS_ACTIVASValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshINCIDENCIAS_ACTIVAS].AsInteger;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetINCIDENCIAS_ACTIVASValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshINCIDENCIAS_ACTIVAS].AsInteger := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshCALLE].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetCALLEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshCALLE].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshPOBLACION].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetPOBLACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshPOBLACION].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshPROVINCIA].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetPROVINCIAValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshPROVINCIA].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshCODIGO_POSTAL].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetCODIGO_POSTALValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshCODIGO_POSTAL].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshPERSONA_CONTACTO].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetPERSONA_CONTACTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshPERSONA_CONTACTO].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetTELEFONOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshTELEFONO].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetTELEFONOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshTELEFONO].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_ALTA].AsDateTime;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshFECHA_MODIFICACION].AsDateTime;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshUSUARIO].AsString;
end;

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

function TPedidosProveedor_RefreshDataTableRules.GetID_PEDIDO_CLIENTEValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID_PEDIDO_CLIENTE].AsInteger;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshID_PEDIDO_CLIENTE].AsInteger := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetREF_PED_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshREF_PED_CLIENTE].AsString;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetREF_PED_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshREF_PED_CLIENTE].AsString := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIMPORTE_NETOValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_NETO].AsCurrency;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetIMPORTE_NETOValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_NETO].AsCurrency := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIMPORTE_PORTEValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_PORTE].AsCurrency;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetIMPORTE_PORTEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_PORTE].AsCurrency := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshDESCUENTO].AsFloat;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetDESCUENTOValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshDESCUENTO].AsFloat := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIMPORTE_DESCUENTOValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_DESCUENTO].AsCurrency;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetIMPORTE_DESCUENTOValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_DESCUENTO].AsCurrency := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetBASE_IMPONIBLEValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshBASE_IMPONIBLE].AsCurrency;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetBASE_IMPONIBLEValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshBASE_IMPONIBLE].AsCurrency := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIVAValue: Float;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIVA].AsFloat;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetIVAValue(const aValue: Float);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshIVA].AsFloat := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetIMPORTE_IVAValue: Currency;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_IVA].AsCurrency;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetIMPORTE_IVAValue(const aValue: Currency);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshIMPORTE_IVA].AsCurrency := aValue;
end;

function TPedidosProveedor_RefreshDataTableRules.GetID_FORMA_PAGOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_RefreshID_FORMA_PAGO].AsInteger;
end;

procedure TPedidosProveedor_RefreshDataTableRules.SetID_FORMA_PAGOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_RefreshID_FORMA_PAGO].AsInteger := aValue;
end;


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

destructor TPedidosProveedor_Articulos_PendientesDataTableRules.Destroy;
begin
  inherited;
end;

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetID_PEDIDOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesID_PEDIDO].AsInteger;
end;

procedure TPedidosProveedor_Articulos_PendientesDataTableRules.SetID_PEDIDOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesID_PEDIDO].AsInteger := aValue;
end;

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesREFERENCIA].AsString;
end;

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

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesID_ARTICULO].AsInteger;
end;

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

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetCONCEPTOValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesCONCEPTO].AsString;
end;

procedure TPedidosProveedor_Articulos_PendientesDataTableRules.SetCONCEPTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesCONCEPTO].AsString := aValue;
end;

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesCANTIDAD].AsInteger;
end;

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

function TPedidosProveedor_Articulos_PendientesDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesREFERENCIA_PROVEEDOR].AsString;
end;

procedure TPedidosProveedor_Articulos_PendientesDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_PedidosProveedor_Articulos_PendientesREFERENCIA_PROVEEDOR].AsString := aValue;
end;


initialization
  RegisterDataTableRules(RID_DarReferencia, TDarReferenciaDataTableRules);
  RegisterDataTableRules(RID_PedidosProveedor, TPedidosProveedorDataTableRules);
  RegisterDataTableRules(RID_PedidosProveedor_Detalles, TPedidosProveedor_DetallesDataTableRules);
  RegisterDataTableRules(RID_PedidosProveedor_Detalles_Refresh, TPedidosProveedor_Detalles_RefreshDataTableRules);
  RegisterDataTableRules(RID_PedidosProveedor_Refresh, TPedidosProveedor_RefreshDataTableRules);
  RegisterDataTableRules(RID_PedidosProveedor_Articulos_Pendientes, TPedidosProveedor_Articulos_PendientesDataTableRules);

end.