AbetoDesign_FactuGES2/Source/Modulos/Contactos/Model/schContactosClient_Intf.pas

unit schContactosClient_Intf;

interface

uses
  Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;

const
  { Data table rules ids
       Feel free to change them to something more human readable
       but make sure they are unique in the context of your application }
  RID_DarEmpresasContacto = '{4117686A-A758-413B-B33F-823F0F223874}';
  RID_PersonalContacto = '{D86CE99D-0742-4C8A-8718-E5496F79C80C}';
  RID_DarTiendaDeUsuario = '{38CBB232-AEFD-4FCB-9047-6C53966235F2}';
  RID_SubCuentasContacto = '{73980B77-D54D-42B6-8296-6AD38BF4A287}';
  RID_Contactos = '{3A69B178-6A2C-427E-B26A-04E45823E419}';
  RID_GruposCliente = '{A1C74C09-156D-46B1-A11B-1DCEBAF1BB76}';
  RID_DatosBancarios = '{2141DA3D-CD6D-4CC9-A875-70E47796DEF8}';
  RID_ContactosDirecciones = '{5AD6717B-F60C-4EB3-A005-5CED779FA124}';
  RID_Clientes = '{A9FCAF3B-8433-4B0C-93A7-739B857FBB6E}';
  RID_Proveedores = '{69974D53-8241-4EEC-A52E-8790FB7F873B}';
  RID_Comerciales = '{55210549-BE51-409A-88BE-DE48C8EC9FE3}';
  RID_Instaladores = '{45B2F841-BEB7-46CF-8370-1866EA458ABA}';
  RID_Vendedores = '{C6987CB6-8B9E-4F3E-B1C6-60BAE7D1DAF0}';
  RID_DireccionesContacto = '{993CC86B-D192-4A2D-B0C1-63F94673AC27}';
  RID_ClientesDescuentos = '{601EC58E-D643-4D1B-A284-A339CEBD48C6}';
  RID_ProcedenciasCliente = '{C9E5D859-F4D4-49C7-9DAC-BBDEC61606CD}';
  RID_GruposProveedor = '{3066E9B1-D0C4-4A30-A219-29B6244C1071}';
  RID_Contactos_Refresh = '{AA673881-49E3-4DE9-928F-D0C0F6697786}';

  { Data table names }
  nme_DarEmpresasContacto = 'DarEmpresasContacto';
  nme_PersonalContacto = 'PersonalContacto';
  nme_DarTiendaDeUsuario = 'DarTiendaDeUsuario';
  nme_SubCuentasContacto = 'SubCuentasContacto';
  nme_Contactos = 'Contactos';
  nme_GruposCliente = 'GruposCliente';
  nme_DatosBancarios = 'DatosBancarios';
  nme_ContactosDirecciones = 'ContactosDirecciones';
  nme_Clientes = 'Clientes';
  nme_Proveedores = 'Proveedores';
  nme_Comerciales = 'Comerciales';
  nme_Instaladores = 'Instaladores';
  nme_Vendedores = 'Vendedores';
  nme_DireccionesContacto = 'DireccionesContacto';
  nme_ClientesDescuentos = 'ClientesDescuentos';
  nme_ProcedenciasCliente = 'ProcedenciasCliente';
  nme_GruposProveedor = 'GruposProveedor';
  nme_Contactos_Refresh = 'Contactos_Refresh';

  { DarEmpresasContacto fields }
  fld_DarEmpresasContactoID_EMPRESA = 'ID_EMPRESA';

  { DarEmpresasContacto field indexes }
  idx_DarEmpresasContactoID_EMPRESA = 0;

  { PersonalContacto fields }
  fld_PersonalContactoID = 'ID';
  fld_PersonalContactoID_CONTACTO = 'ID_CONTACTO';
  fld_PersonalContactoNOMBRE = 'NOMBRE';
  fld_PersonalContactoPUESTO = 'PUESTO';
  fld_PersonalContactoTELEFONO = 'TELEFONO';
  fld_PersonalContactoMOVIL = 'MOVIL';
  fld_PersonalContactoFAX = 'FAX';
  fld_PersonalContactoEMAIL = 'EMAIL';
  fld_PersonalContactoFECHA_ALTA = 'FECHA_ALTA';
  fld_PersonalContactoFECHA_MODIFICACION = 'FECHA_MODIFICACION';

  { PersonalContacto field indexes }
  idx_PersonalContactoID = 0;
  idx_PersonalContactoID_CONTACTO = 1;
  idx_PersonalContactoNOMBRE = 2;
  idx_PersonalContactoPUESTO = 3;
  idx_PersonalContactoTELEFONO = 4;
  idx_PersonalContactoMOVIL = 5;
  idx_PersonalContactoFAX = 6;
  idx_PersonalContactoEMAIL = 7;
  idx_PersonalContactoFECHA_ALTA = 8;
  idx_PersonalContactoFECHA_MODIFICACION = 9;

  { DarTiendaDeUsuario fields }
  fld_DarTiendaDeUsuarioID_TIENDA = 'ID_TIENDA';

  { DarTiendaDeUsuario field indexes }
  idx_DarTiendaDeUsuarioID_TIENDA = 0;

  { SubCuentasContacto fields }
  fld_SubCuentasContactoID = 'ID';
  fld_SubCuentasContactoREF_SUBCUENTA = 'REF_SUBCUENTA';
  fld_SubCuentasContactoDESCRIPCION = 'DESCRIPCION';
  fld_SubCuentasContactoID_CUENTA = 'ID_CUENTA';
  fld_SubCuentasContactoID_EJERCICIO = 'ID_EJERCICIO';
  fld_SubCuentasContactoID_CONTACTO = 'ID_CONTACTO';

  { SubCuentasContacto field indexes }
  idx_SubCuentasContactoID = 0;
  idx_SubCuentasContactoREF_SUBCUENTA = 1;
  idx_SubCuentasContactoDESCRIPCION = 2;
  idx_SubCuentasContactoID_CUENTA = 3;
  idx_SubCuentasContactoID_EJERCICIO = 4;
  idx_SubCuentasContactoID_CONTACTO = 5;

  { Contactos fields }
  fld_ContactosID = 'ID';
  fld_ContactosID_CATEGORIA = 'ID_CATEGORIA';
  fld_ContactosNIF_CIF = 'NIF_CIF';
  fld_ContactosNOMBRE = 'NOMBRE';
  fld_ContactosPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_ContactosCALLE = 'CALLE';
  fld_ContactosPOBLACION = 'POBLACION';
  fld_ContactosPROVINCIA = 'PROVINCIA';
  fld_ContactosCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_ContactosPAIS = 'PAIS';
  fld_ContactosIDIOMA_ISO = 'IDIOMA_ISO';
  fld_ContactosIDIOMA = 'IDIOMA';
  fld_ContactosTELEFONO_1 = 'TELEFONO_1';
  fld_ContactosTELEFONO_2 = 'TELEFONO_2';
  fld_ContactosMOVIL_1 = 'MOVIL_1';
  fld_ContactosMOVIL_2 = 'MOVIL_2';
  fld_ContactosFAX = 'FAX';
  fld_ContactosEMAIL_1 = 'EMAIL_1';
  fld_ContactosEMAIL_2 = 'EMAIL_2';
  fld_ContactosPAGINA_WEB = 'PAGINA_WEB';
  fld_ContactosNOTAS = 'NOTAS';
  fld_ContactosFECHA_ALTA = 'FECHA_ALTA';
  fld_ContactosFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_ContactosUSUARIO = 'USUARIO';
  fld_ContactosID_EMPRESA = 'ID_EMPRESA';
  fld_ContactosREFERENCIA = 'REFERENCIA';
  fld_ContactosID_TIENDA = 'ID_TIENDA';
  fld_ContactosTIENDA = 'TIENDA';

  { Contactos field indexes }
  idx_ContactosID = 0;
  idx_ContactosID_CATEGORIA = 1;
  idx_ContactosNIF_CIF = 2;
  idx_ContactosNOMBRE = 3;
  idx_ContactosPERSONA_CONTACTO = 4;
  idx_ContactosCALLE = 5;
  idx_ContactosPOBLACION = 6;
  idx_ContactosPROVINCIA = 7;
  idx_ContactosCODIGO_POSTAL = 8;
  idx_ContactosPAIS = 9;
  idx_ContactosIDIOMA_ISO = 10;
  idx_ContactosIDIOMA = 11;
  idx_ContactosTELEFONO_1 = 12;
  idx_ContactosTELEFONO_2 = 13;
  idx_ContactosMOVIL_1 = 14;
  idx_ContactosMOVIL_2 = 15;
  idx_ContactosFAX = 16;
  idx_ContactosEMAIL_1 = 17;
  idx_ContactosEMAIL_2 = 18;
  idx_ContactosPAGINA_WEB = 19;
  idx_ContactosNOTAS = 20;
  idx_ContactosFECHA_ALTA = 21;
  idx_ContactosFECHA_MODIFICACION = 22;
  idx_ContactosUSUARIO = 23;
  idx_ContactosID_EMPRESA = 24;
  idx_ContactosREFERENCIA = 25;
  idx_ContactosID_TIENDA = 26;
  idx_ContactosTIENDA = 27;

  { GruposCliente fields }
  fld_GruposClienteID = 'ID';
  fld_GruposClienteDESCRIPCION = 'DESCRIPCION';

  { GruposCliente field indexes }
  idx_GruposClienteID = 0;
  idx_GruposClienteDESCRIPCION = 1;

  { DatosBancarios fields }
  fld_DatosBancariosID = 'ID';
  fld_DatosBancariosID_CONTACTO = 'ID_CONTACTO';
  fld_DatosBancariosTITULAR = 'TITULAR';
  fld_DatosBancariosENTIDAD = 'ENTIDAD';
  fld_DatosBancariosSUCURSAL = 'SUCURSAL';
  fld_DatosBancariosDC = 'DC';
  fld_DatosBancariosCUENTA = 'CUENTA';
  fld_DatosBancariosFECHA_ALTA = 'FECHA_ALTA';
  fld_DatosBancariosFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_DatosBancariosIBAN = 'IBAN';
  fld_DatosBancariosSWIFT = 'SWIFT';

  { DatosBancarios field indexes }
  idx_DatosBancariosID = 0;
  idx_DatosBancariosID_CONTACTO = 1;
  idx_DatosBancariosTITULAR = 2;
  idx_DatosBancariosENTIDAD = 3;
  idx_DatosBancariosSUCURSAL = 4;
  idx_DatosBancariosDC = 5;
  idx_DatosBancariosCUENTA = 6;
  idx_DatosBancariosFECHA_ALTA = 7;
  idx_DatosBancariosFECHA_MODIFICACION = 8;
  idx_DatosBancariosIBAN = 9;
  idx_DatosBancariosSWIFT = 10;

  { ContactosDirecciones fields }
  fld_ContactosDireccionesID_CONTACTO = 'ID_CONTACTO';
  fld_ContactosDireccionesID_DIRECCION = 'ID_DIRECCION';
  fld_ContactosDireccionesNOMBRE = 'NOMBRE';
  fld_ContactosDireccionesNIF_CIF = 'NIF_CIF';
  fld_ContactosDireccionesCALLE = 'CALLE';
  fld_ContactosDireccionesPOBLACION = 'POBLACION';
  fld_ContactosDireccionesPROVINCIA = 'PROVINCIA';
  fld_ContactosDireccionesCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_ContactosDireccionesTELEFONO = 'TELEFONO';
  fld_ContactosDireccionesMOVIL = 'MOVIL';
  fld_ContactosDireccionesFAX = 'FAX';
  fld_ContactosDireccionesEMAIL = 'EMAIL';
  fld_ContactosDireccionesPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_ContactosDireccionesPAIS = 'PAIS';

  { ContactosDirecciones field indexes }
  idx_ContactosDireccionesID_CONTACTO = 0;
  idx_ContactosDireccionesID_DIRECCION = 1;
  idx_ContactosDireccionesNOMBRE = 2;
  idx_ContactosDireccionesNIF_CIF = 3;
  idx_ContactosDireccionesCALLE = 4;
  idx_ContactosDireccionesPOBLACION = 5;
  idx_ContactosDireccionesPROVINCIA = 6;
  idx_ContactosDireccionesCODIGO_POSTAL = 7;
  idx_ContactosDireccionesTELEFONO = 8;
  idx_ContactosDireccionesMOVIL = 9;
  idx_ContactosDireccionesFAX = 10;
  idx_ContactosDireccionesEMAIL = 11;
  idx_ContactosDireccionesPERSONA_CONTACTO = 12;
  idx_ContactosDireccionesPAIS = 13;

  { Clientes fields }
  fld_ClientesID = 'ID';
  fld_ClientesID_CATEGORIA = 'ID_CATEGORIA';
  fld_ClientesNIF_CIF = 'NIF_CIF';
  fld_ClientesNOMBRE = 'NOMBRE';
  fld_ClientesPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_ClientesCALLE = 'CALLE';
  fld_ClientesPOBLACION = 'POBLACION';
  fld_ClientesPROVINCIA = 'PROVINCIA';
  fld_ClientesCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_ClientesPAIS = 'PAIS';
  fld_ClientesIDIOMA_ISO = 'IDIOMA_ISO';
  fld_ClientesIDIOMA = 'IDIOMA';
  fld_ClientesTELEFONO_1 = 'TELEFONO_1';
  fld_ClientesTELEFONO_2 = 'TELEFONO_2';
  fld_ClientesMOVIL_1 = 'MOVIL_1';
  fld_ClientesMOVIL_2 = 'MOVIL_2';
  fld_ClientesFAX = 'FAX';
  fld_ClientesEMAIL_1 = 'EMAIL_1';
  fld_ClientesEMAIL_2 = 'EMAIL_2';
  fld_ClientesPAGINA_WEB = 'PAGINA_WEB';
  fld_ClientesNOTAS = 'NOTAS';
  fld_ClientesFECHA_ALTA = 'FECHA_ALTA';
  fld_ClientesFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_ClientesUSUARIO = 'USUARIO';
  fld_ClientesID_EMPRESA = 'ID_EMPRESA';
  fld_ClientesREFERENCIA = 'REFERENCIA';
  fld_ClientesID_TIENDA = 'ID_TIENDA';
  fld_ClientesTIENDA = 'TIENDA';
  fld_ClientesGRUPO_CLIENTE = 'GRUPO_CLIENTE';
  fld_ClientesNOMBRE_COMERCIAL = 'NOMBRE_COMERCIAL';
  fld_ClientesBLOQUEADO = 'BLOQUEADO';
  fld_ClientesREGIMEN_IVA = 'REGIMEN_IVA';
  fld_ClientesMOTIVO_BLOQUEO = 'MOTIVO_BLOQUEO';
  fld_ClientesRECARGO_EQUIVALENCIA = 'RECARGO_EQUIVALENCIA';
  fld_ClientesID_TIPO_IVA = 'ID_TIPO_IVA';
  fld_ClientesID_FORMA_PAGO = 'ID_FORMA_PAGO';
  fld_ClientesTIENDA_WEB = 'TIENDA_WEB';
  fld_ClientesCODIGO_ASIGNADO = 'CODIGO_ASIGNADO';
  fld_ClientesIGNORAR_CONTABILIDAD = 'IGNORAR_CONTABILIDAD';
  fld_ClientesTIENE_SUBCUENTA = 'TIENE_SUBCUENTA';
  fld_ClientesPROCEDENCIA_CLIENTE = 'PROCEDENCIA_CLIENTE';
  fld_ClientesVENCIMIENTO_FACTURAS_1 = 'VENCIMIENTO_FACTURAS_1';
  fld_ClientesVENCIMIENTO_FACTURAS_2 = 'VENCIMIENTO_FACTURAS_2';
  fld_ClientesVENCIMIENTO_FACTURAS_3 = 'VENCIMIENTO_FACTURAS_3';
  fld_ClientesDESCUENTO = 'DESCUENTO';
  fld_ClientesDESCUENTO_LINEA = 'DESCUENTO_LINEA';
  fld_ClientesPRECIO_PUNTO = 'PRECIO_PUNTO';
  fld_ClientesID_AGENTE = 'ID_AGENTE';
  fld_ClientesAGENTE = 'AGENTE';
  fld_ClientesDELEGACION = 'DELEGACION';
  fld_ClientesDESCUENTO_CAPITULO = 'DESCUENTO_CAPITULO';
  fld_ClientesDIST_EMAIL = 'DIST_EMAIL';
  fld_ClientesDIST_PASSWORD = 'DIST_PASSWORD';
  fld_ClientesDIST_VALIDEZ = 'DIST_VALIDEZ';
  fld_ClientesDIST_FORMA_PAGO = 'DIST_FORMA_PAGO';
  fld_ClientesDIST_NOTAS = 'DIST_NOTAS';
  fld_ClientesDIST_LOPD = 'DIST_LOPD';
  fld_ClientesDIST_CONDICIONES = 'DIST_CONDICIONES';

  { Clientes field indexes }
  idx_ClientesID = 0;
  idx_ClientesID_CATEGORIA = 1;
  idx_ClientesNIF_CIF = 2;
  idx_ClientesNOMBRE = 3;
  idx_ClientesPERSONA_CONTACTO = 4;
  idx_ClientesCALLE = 5;
  idx_ClientesPOBLACION = 6;
  idx_ClientesPROVINCIA = 7;
  idx_ClientesCODIGO_POSTAL = 8;
  idx_ClientesPAIS = 9;
  idx_ClientesIDIOMA_ISO = 10;
  idx_ClientesIDIOMA = 11;
  idx_ClientesTELEFONO_1 = 12;
  idx_ClientesTELEFONO_2 = 13;
  idx_ClientesMOVIL_1 = 14;
  idx_ClientesMOVIL_2 = 15;
  idx_ClientesFAX = 16;
  idx_ClientesEMAIL_1 = 17;
  idx_ClientesEMAIL_2 = 18;
  idx_ClientesPAGINA_WEB = 19;
  idx_ClientesNOTAS = 20;
  idx_ClientesFECHA_ALTA = 21;
  idx_ClientesFECHA_MODIFICACION = 22;
  idx_ClientesUSUARIO = 23;
  idx_ClientesID_EMPRESA = 24;
  idx_ClientesREFERENCIA = 25;
  idx_ClientesID_TIENDA = 26;
  idx_ClientesTIENDA = 27;
  idx_ClientesGRUPO_CLIENTE = 28;
  idx_ClientesNOMBRE_COMERCIAL = 29;
  idx_ClientesBLOQUEADO = 30;
  idx_ClientesREGIMEN_IVA = 31;
  idx_ClientesMOTIVO_BLOQUEO = 32;
  idx_ClientesRECARGO_EQUIVALENCIA = 33;
  idx_ClientesID_TIPO_IVA = 34;
  idx_ClientesID_FORMA_PAGO = 35;
  idx_ClientesTIENDA_WEB = 36;
  idx_ClientesCODIGO_ASIGNADO = 37;
  idx_ClientesIGNORAR_CONTABILIDAD = 38;
  idx_ClientesTIENE_SUBCUENTA = 39;
  idx_ClientesPROCEDENCIA_CLIENTE = 40;
  idx_ClientesVENCIMIENTO_FACTURAS_1 = 41;
  idx_ClientesVENCIMIENTO_FACTURAS_2 = 42;
  idx_ClientesVENCIMIENTO_FACTURAS_3 = 43;
  idx_ClientesDESCUENTO = 44;
  idx_ClientesDESCUENTO_LINEA = 45;
  idx_ClientesPRECIO_PUNTO = 46;
  idx_ClientesID_AGENTE = 47;
  idx_ClientesAGENTE = 48;
  idx_ClientesDELEGACION = 49;
  idx_ClientesDESCUENTO_CAPITULO = 50;
  idx_ClientesDIST_EMAIL = 51;
  idx_ClientesDIST_PASSWORD = 52;
  idx_ClientesDIST_VALIDEZ = 53;
  idx_ClientesDIST_FORMA_PAGO = 54;
  idx_ClientesDIST_NOTAS = 55;
  idx_ClientesDIST_LOPD = 56;
  idx_ClientesDIST_CONDICIONES = 57;

  { Proveedores fields }
  fld_ProveedoresID = 'ID';
  fld_ProveedoresID_CATEGORIA = 'ID_CATEGORIA';
  fld_ProveedoresNIF_CIF = 'NIF_CIF';
  fld_ProveedoresNOMBRE = 'NOMBRE';
  fld_ProveedoresPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_ProveedoresCALLE = 'CALLE';
  fld_ProveedoresPOBLACION = 'POBLACION';
  fld_ProveedoresPROVINCIA = 'PROVINCIA';
  fld_ProveedoresCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_ProveedoresPAIS = 'PAIS';
  fld_ProveedoresIDIOMA_ISO = 'IDIOMA_ISO';
  fld_ProveedoresIDIOMA = 'IDIOMA';
  fld_ProveedoresTELEFONO_1 = 'TELEFONO_1';
  fld_ProveedoresTELEFONO_2 = 'TELEFONO_2';
  fld_ProveedoresMOVIL_1 = 'MOVIL_1';
  fld_ProveedoresMOVIL_2 = 'MOVIL_2';
  fld_ProveedoresFAX = 'FAX';
  fld_ProveedoresEMAIL_1 = 'EMAIL_1';
  fld_ProveedoresEMAIL_2 = 'EMAIL_2';
  fld_ProveedoresPAGINA_WEB = 'PAGINA_WEB';
  fld_ProveedoresNOTAS = 'NOTAS';
  fld_ProveedoresFECHA_ALTA = 'FECHA_ALTA';
  fld_ProveedoresFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_ProveedoresUSUARIO = 'USUARIO';
  fld_ProveedoresID_EMPRESA = 'ID_EMPRESA';
  fld_ProveedoresREFERENCIA = 'REFERENCIA';
  fld_ProveedoresID_TIENDA = 'ID_TIENDA';
  fld_ProveedoresTIENDA = 'TIENDA';
  fld_ProveedoresDESCUENTO = 'DESCUENTO';
  fld_ProveedoresDESCRIPCION_PROVEEDOR = 'DESCRIPCION_PROVEEDOR';
  fld_ProveedoresCODIGO_ASIGNADO = 'CODIGO_ASIGNADO';
  fld_ProveedoresGRUPO_PROVEEDOR = 'GRUPO_PROVEEDOR';
  fld_ProveedoresREGIMEN_IVA = 'REGIMEN_IVA';
  fld_ProveedoresID_TIPO_IVA = 'ID_TIPO_IVA';
  fld_ProveedoresID_FORMA_PAGO = 'ID_FORMA_PAGO';
  fld_ProveedoresTIENDA_WEB = 'TIENDA_WEB';
  fld_ProveedoresHOMOLOGADO = 'HOMOLOGADO';
  fld_ProveedoresCERTIFICACION = 'CERTIFICACION';
  fld_ProveedoresIGNORAR_CONTABILIDAD = 'IGNORAR_CONTABILIDAD';
  fld_ProveedoresTIENE_SUBCUENTA = 'TIENE_SUBCUENTA';
  fld_ProveedoresNOMBRE_COMERCIAL = 'NOMBRE_COMERCIAL';
  fld_ProveedoresES_ACREEDOR = 'ES_ACREEDOR';
  fld_ProveedoresVENCIMIENTO_FACTURAS_1 = 'VENCIMIENTO_FACTURAS_1';
  fld_ProveedoresVENCIMIENTO_FACTURAS_2 = 'VENCIMIENTO_FACTURAS_2';
  fld_ProveedoresVENCIMIENTO_FACTURAS_3 = 'VENCIMIENTO_FACTURAS_3';

  { Proveedores field indexes }
  idx_ProveedoresID = 0;
  idx_ProveedoresID_CATEGORIA = 1;
  idx_ProveedoresNIF_CIF = 2;
  idx_ProveedoresNOMBRE = 3;
  idx_ProveedoresPERSONA_CONTACTO = 4;
  idx_ProveedoresCALLE = 5;
  idx_ProveedoresPOBLACION = 6;
  idx_ProveedoresPROVINCIA = 7;
  idx_ProveedoresCODIGO_POSTAL = 8;
  idx_ProveedoresPAIS = 9;
  idx_ProveedoresIDIOMA_ISO = 10;
  idx_ProveedoresIDIOMA = 11;
  idx_ProveedoresTELEFONO_1 = 12;
  idx_ProveedoresTELEFONO_2 = 13;
  idx_ProveedoresMOVIL_1 = 14;
  idx_ProveedoresMOVIL_2 = 15;
  idx_ProveedoresFAX = 16;
  idx_ProveedoresEMAIL_1 = 17;
  idx_ProveedoresEMAIL_2 = 18;
  idx_ProveedoresPAGINA_WEB = 19;
  idx_ProveedoresNOTAS = 20;
  idx_ProveedoresFECHA_ALTA = 21;
  idx_ProveedoresFECHA_MODIFICACION = 22;
  idx_ProveedoresUSUARIO = 23;
  idx_ProveedoresID_EMPRESA = 24;
  idx_ProveedoresREFERENCIA = 25;
  idx_ProveedoresID_TIENDA = 26;
  idx_ProveedoresTIENDA = 27;
  idx_ProveedoresDESCUENTO = 28;
  idx_ProveedoresDESCRIPCION_PROVEEDOR = 29;
  idx_ProveedoresCODIGO_ASIGNADO = 30;
  idx_ProveedoresGRUPO_PROVEEDOR = 31;
  idx_ProveedoresREGIMEN_IVA = 32;
  idx_ProveedoresID_TIPO_IVA = 33;
  idx_ProveedoresID_FORMA_PAGO = 34;
  idx_ProveedoresTIENDA_WEB = 35;
  idx_ProveedoresHOMOLOGADO = 36;
  idx_ProveedoresCERTIFICACION = 37;
  idx_ProveedoresIGNORAR_CONTABILIDAD = 38;
  idx_ProveedoresTIENE_SUBCUENTA = 39;
  idx_ProveedoresNOMBRE_COMERCIAL = 40;
  idx_ProveedoresES_ACREEDOR = 41;
  idx_ProveedoresVENCIMIENTO_FACTURAS_1 = 42;
  idx_ProveedoresVENCIMIENTO_FACTURAS_2 = 43;
  idx_ProveedoresVENCIMIENTO_FACTURAS_3 = 44;

  { Comerciales fields }
  fld_ComercialesID = 'ID';
  fld_ComercialesID_CATEGORIA = 'ID_CATEGORIA';
  fld_ComercialesNIF_CIF = 'NIF_CIF';
  fld_ComercialesNOMBRE = 'NOMBRE';
  fld_ComercialesPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_ComercialesCALLE = 'CALLE';
  fld_ComercialesPOBLACION = 'POBLACION';
  fld_ComercialesPROVINCIA = 'PROVINCIA';
  fld_ComercialesCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_ComercialesPAIS = 'PAIS';
  fld_ComercialesIDIOMA_ISO = 'IDIOMA_ISO';
  fld_ComercialesIDIOMA = 'IDIOMA';
  fld_ComercialesTELEFONO_1 = 'TELEFONO_1';
  fld_ComercialesTELEFONO_2 = 'TELEFONO_2';
  fld_ComercialesMOVIL_1 = 'MOVIL_1';
  fld_ComercialesMOVIL_2 = 'MOVIL_2';
  fld_ComercialesFAX = 'FAX';
  fld_ComercialesEMAIL_1 = 'EMAIL_1';
  fld_ComercialesEMAIL_2 = 'EMAIL_2';
  fld_ComercialesPAGINA_WEB = 'PAGINA_WEB';
  fld_ComercialesNOTAS = 'NOTAS';
  fld_ComercialesFECHA_ALTA = 'FECHA_ALTA';
  fld_ComercialesFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_ComercialesUSUARIO = 'USUARIO';
  fld_ComercialesID_EMPRESA = 'ID_EMPRESA';
  fld_ComercialesREFERENCIA = 'REFERENCIA';
  fld_ComercialesID_TIENDA = 'ID_TIENDA';
  fld_ComercialesTIENDA = 'TIENDA';
  fld_ComercialesCOMISION = 'COMISION';
  fld_ComercialesDELEGACION = 'DELEGACION';
  fld_ComercialesFECHA_ALTA_EMPRESA = 'FECHA_ALTA_EMPRESA';
  fld_ComercialesFECHA_BAJA = 'FECHA_BAJA';
  fld_ComercialesCAUSA_BAJA = 'CAUSA_BAJA';

  { Comerciales field indexes }
  idx_ComercialesID = 0;
  idx_ComercialesID_CATEGORIA = 1;
  idx_ComercialesNIF_CIF = 2;
  idx_ComercialesNOMBRE = 3;
  idx_ComercialesPERSONA_CONTACTO = 4;
  idx_ComercialesCALLE = 5;
  idx_ComercialesPOBLACION = 6;
  idx_ComercialesPROVINCIA = 7;
  idx_ComercialesCODIGO_POSTAL = 8;
  idx_ComercialesPAIS = 9;
  idx_ComercialesIDIOMA_ISO = 10;
  idx_ComercialesIDIOMA = 11;
  idx_ComercialesTELEFONO_1 = 12;
  idx_ComercialesTELEFONO_2 = 13;
  idx_ComercialesMOVIL_1 = 14;
  idx_ComercialesMOVIL_2 = 15;
  idx_ComercialesFAX = 16;
  idx_ComercialesEMAIL_1 = 17;
  idx_ComercialesEMAIL_2 = 18;
  idx_ComercialesPAGINA_WEB = 19;
  idx_ComercialesNOTAS = 20;
  idx_ComercialesFECHA_ALTA = 21;
  idx_ComercialesFECHA_MODIFICACION = 22;
  idx_ComercialesUSUARIO = 23;
  idx_ComercialesID_EMPRESA = 24;
  idx_ComercialesREFERENCIA = 25;
  idx_ComercialesID_TIENDA = 26;
  idx_ComercialesTIENDA = 27;
  idx_ComercialesCOMISION = 28;
  idx_ComercialesDELEGACION = 29;
  idx_ComercialesFECHA_ALTA_EMPRESA = 30;
  idx_ComercialesFECHA_BAJA = 31;
  idx_ComercialesCAUSA_BAJA = 32;

  { Instaladores fields }
  fld_InstaladoresID = 'ID';
  fld_InstaladoresID_CATEGORIA = 'ID_CATEGORIA';
  fld_InstaladoresNIF_CIF = 'NIF_CIF';
  fld_InstaladoresNOMBRE = 'NOMBRE';
  fld_InstaladoresPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_InstaladoresCALLE = 'CALLE';
  fld_InstaladoresPOBLACION = 'POBLACION';
  fld_InstaladoresPROVINCIA = 'PROVINCIA';
  fld_InstaladoresCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_InstaladoresPAIS = 'PAIS';
  fld_InstaladoresIDIOMA_ISO = 'IDIOMA_ISO';
  fld_InstaladoresIDIOMA = 'IDIOMA';
  fld_InstaladoresTELEFONO_1 = 'TELEFONO_1';
  fld_InstaladoresTELEFONO_2 = 'TELEFONO_2';
  fld_InstaladoresMOVIL_1 = 'MOVIL_1';
  fld_InstaladoresMOVIL_2 = 'MOVIL_2';
  fld_InstaladoresFAX = 'FAX';
  fld_InstaladoresEMAIL_1 = 'EMAIL_1';
  fld_InstaladoresEMAIL_2 = 'EMAIL_2';
  fld_InstaladoresPAGINA_WEB = 'PAGINA_WEB';
  fld_InstaladoresNOTAS = 'NOTAS';
  fld_InstaladoresFECHA_ALTA = 'FECHA_ALTA';
  fld_InstaladoresFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_InstaladoresUSUARIO = 'USUARIO';
  fld_InstaladoresID_EMPRESA = 'ID_EMPRESA';
  fld_InstaladoresREFERENCIA = 'REFERENCIA';
  fld_InstaladoresID_TIENDA = 'ID_TIENDA';
  fld_InstaladoresTIENDA = 'TIENDA';

  { Instaladores field indexes }
  idx_InstaladoresID = 0;
  idx_InstaladoresID_CATEGORIA = 1;
  idx_InstaladoresNIF_CIF = 2;
  idx_InstaladoresNOMBRE = 3;
  idx_InstaladoresPERSONA_CONTACTO = 4;
  idx_InstaladoresCALLE = 5;
  idx_InstaladoresPOBLACION = 6;
  idx_InstaladoresPROVINCIA = 7;
  idx_InstaladoresCODIGO_POSTAL = 8;
  idx_InstaladoresPAIS = 9;
  idx_InstaladoresIDIOMA_ISO = 10;
  idx_InstaladoresIDIOMA = 11;
  idx_InstaladoresTELEFONO_1 = 12;
  idx_InstaladoresTELEFONO_2 = 13;
  idx_InstaladoresMOVIL_1 = 14;
  idx_InstaladoresMOVIL_2 = 15;
  idx_InstaladoresFAX = 16;
  idx_InstaladoresEMAIL_1 = 17;
  idx_InstaladoresEMAIL_2 = 18;
  idx_InstaladoresPAGINA_WEB = 19;
  idx_InstaladoresNOTAS = 20;
  idx_InstaladoresFECHA_ALTA = 21;
  idx_InstaladoresFECHA_MODIFICACION = 22;
  idx_InstaladoresUSUARIO = 23;
  idx_InstaladoresID_EMPRESA = 24;
  idx_InstaladoresREFERENCIA = 25;
  idx_InstaladoresID_TIENDA = 26;
  idx_InstaladoresTIENDA = 27;

  { Vendedores fields }
  fld_VendedoresID = 'ID';
  fld_VendedoresID_CATEGORIA = 'ID_CATEGORIA';
  fld_VendedoresNIF_CIF = 'NIF_CIF';
  fld_VendedoresNOMBRE = 'NOMBRE';
  fld_VendedoresPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_VendedoresCALLE = 'CALLE';
  fld_VendedoresPOBLACION = 'POBLACION';
  fld_VendedoresPROVINCIA = 'PROVINCIA';
  fld_VendedoresCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_VendedoresPAIS = 'PAIS';
  fld_VendedoresIDIOMA_ISO = 'IDIOMA_ISO';
  fld_VendedoresIDIOMA = 'IDIOMA';
  fld_VendedoresTELEFONO_1 = 'TELEFONO_1';
  fld_VendedoresTELEFONO_2 = 'TELEFONO_2';
  fld_VendedoresMOVIL_1 = 'MOVIL_1';
  fld_VendedoresMOVIL_2 = 'MOVIL_2';
  fld_VendedoresFAX = 'FAX';
  fld_VendedoresEMAIL_1 = 'EMAIL_1';
  fld_VendedoresEMAIL_2 = 'EMAIL_2';
  fld_VendedoresPAGINA_WEB = 'PAGINA_WEB';
  fld_VendedoresNOTAS = 'NOTAS';
  fld_VendedoresFECHA_ALTA = 'FECHA_ALTA';
  fld_VendedoresFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_VendedoresUSUARIO = 'USUARIO';
  fld_VendedoresID_EMPRESA = 'ID_EMPRESA';
  fld_VendedoresREFERENCIA = 'REFERENCIA';
  fld_VendedoresID_TIENDA = 'ID_TIENDA';
  fld_VendedoresTIENDA = 'TIENDA';
  fld_VendedoresCOMISION = 'COMISION';
  fld_VendedoresID_USUARIO = 'ID_USUARIO';

  { Vendedores field indexes }
  idx_VendedoresID = 0;
  idx_VendedoresID_CATEGORIA = 1;
  idx_VendedoresNIF_CIF = 2;
  idx_VendedoresNOMBRE = 3;
  idx_VendedoresPERSONA_CONTACTO = 4;
  idx_VendedoresCALLE = 5;
  idx_VendedoresPOBLACION = 6;
  idx_VendedoresPROVINCIA = 7;
  idx_VendedoresCODIGO_POSTAL = 8;
  idx_VendedoresPAIS = 9;
  idx_VendedoresIDIOMA_ISO = 10;
  idx_VendedoresIDIOMA = 11;
  idx_VendedoresTELEFONO_1 = 12;
  idx_VendedoresTELEFONO_2 = 13;
  idx_VendedoresMOVIL_1 = 14;
  idx_VendedoresMOVIL_2 = 15;
  idx_VendedoresFAX = 16;
  idx_VendedoresEMAIL_1 = 17;
  idx_VendedoresEMAIL_2 = 18;
  idx_VendedoresPAGINA_WEB = 19;
  idx_VendedoresNOTAS = 20;
  idx_VendedoresFECHA_ALTA = 21;
  idx_VendedoresFECHA_MODIFICACION = 22;
  idx_VendedoresUSUARIO = 23;
  idx_VendedoresID_EMPRESA = 24;
  idx_VendedoresREFERENCIA = 25;
  idx_VendedoresID_TIENDA = 26;
  idx_VendedoresTIENDA = 27;
  idx_VendedoresCOMISION = 28;
  idx_VendedoresID_USUARIO = 29;

  { DireccionesContacto fields }
  fld_DireccionesContactoID = 'ID';
  fld_DireccionesContactoID_CONTACTO = 'ID_CONTACTO';
  fld_DireccionesContactoNIF_CIF = 'NIF_CIF';
  fld_DireccionesContactoCALLE = 'CALLE';
  fld_DireccionesContactoPOBLACION = 'POBLACION';
  fld_DireccionesContactoPROVINCIA = 'PROVINCIA';
  fld_DireccionesContactoCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_DireccionesContactoPERSONA_CONTACTO = 'PERSONA_CONTACTO';
  fld_DireccionesContactoNOMBRE = 'NOMBRE';
  fld_DireccionesContactoTELEFONO = 'TELEFONO';
  fld_DireccionesContactoMOVIL = 'MOVIL';
  fld_DireccionesContactoFAX = 'FAX';
  fld_DireccionesContactoEMAIL = 'EMAIL';
  fld_DireccionesContactoNOTAS = 'NOTAS';
  fld_DireccionesContactoPORTE = 'PORTE';
  fld_DireccionesContactoFECHA_ALTA = 'FECHA_ALTA';
  fld_DireccionesContactoFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_DireccionesContactoPAIS = 'PAIS';

  { DireccionesContacto field indexes }
  idx_DireccionesContactoID = 0;
  idx_DireccionesContactoID_CONTACTO = 1;
  idx_DireccionesContactoNIF_CIF = 2;
  idx_DireccionesContactoCALLE = 3;
  idx_DireccionesContactoPOBLACION = 4;
  idx_DireccionesContactoPROVINCIA = 5;
  idx_DireccionesContactoCODIGO_POSTAL = 6;
  idx_DireccionesContactoPERSONA_CONTACTO = 7;
  idx_DireccionesContactoNOMBRE = 8;
  idx_DireccionesContactoTELEFONO = 9;
  idx_DireccionesContactoMOVIL = 10;
  idx_DireccionesContactoFAX = 11;
  idx_DireccionesContactoEMAIL = 12;
  idx_DireccionesContactoNOTAS = 13;
  idx_DireccionesContactoPORTE = 14;
  idx_DireccionesContactoFECHA_ALTA = 15;
  idx_DireccionesContactoFECHA_MODIFICACION = 16;
  idx_DireccionesContactoPAIS = 17;

  { ClientesDescuentos fields }
  fld_ClientesDescuentosID = 'ID';
  fld_ClientesDescuentosID_CLIENTE = 'ID_CLIENTE';
  fld_ClientesDescuentosID_PROVEEDOR = 'ID_PROVEEDOR';
  fld_ClientesDescuentosNOMBRE = 'NOMBRE';
  fld_ClientesDescuentosDESCUENTO = 'DESCUENTO';

  { ClientesDescuentos field indexes }
  idx_ClientesDescuentosID = 0;
  idx_ClientesDescuentosID_CLIENTE = 1;
  idx_ClientesDescuentosID_PROVEEDOR = 2;
  idx_ClientesDescuentosNOMBRE = 3;
  idx_ClientesDescuentosDESCUENTO = 4;

  { ProcedenciasCliente fields }
  fld_ProcedenciasClienteID = 'ID';
  fld_ProcedenciasClienteDESCRIPCION = 'DESCRIPCION';

  { ProcedenciasCliente field indexes }
  idx_ProcedenciasClienteID = 0;
  idx_ProcedenciasClienteDESCRIPCION = 1;

  { GruposProveedor fields }
  fld_GruposProveedorID = 'ID';
  fld_GruposProveedorDESCRIPCION = 'DESCRIPCION';

  { GruposProveedor field indexes }
  idx_GruposProveedorID = 0;
  idx_GruposProveedorDESCRIPCION = 1;

  { Contactos_Refresh fields }
  fld_Contactos_RefreshID = 'ID';
  fld_Contactos_RefreshNIF_CIF = 'NIF_CIF';
  fld_Contactos_RefreshNOMBRE = 'NOMBRE';
  fld_Contactos_RefreshCALLE = 'CALLE';
  fld_Contactos_RefreshPOBLACION = 'POBLACION';
  fld_Contactos_RefreshPROVINCIA = 'PROVINCIA';
  fld_Contactos_RefreshCODIGO_POSTAL = 'CODIGO_POSTAL';
  fld_Contactos_RefreshPAIS = 'PAIS';
  fld_Contactos_RefreshTELEFONO_1 = 'TELEFONO_1';
  fld_Contactos_RefreshTELEFONO_2 = 'TELEFONO_2';
  fld_Contactos_RefreshMOVIL_1 = 'MOVIL_1';
  fld_Contactos_RefreshMOVIL_2 = 'MOVIL_2';
  fld_Contactos_RefreshFAX = 'FAX';
  fld_Contactos_RefreshEMAIL_1 = 'EMAIL_1';
  fld_Contactos_RefreshEMAIL_2 = 'EMAIL_2';
  fld_Contactos_RefreshPAGINA_WEB = 'PAGINA_WEB';
  fld_Contactos_RefreshNOTAS = 'NOTAS';
  fld_Contactos_RefreshFECHA_ALTA = 'FECHA_ALTA';
  fld_Contactos_RefreshFECHA_MODIFICACION = 'FECHA_MODIFICACION';
  fld_Contactos_RefreshUSUARIO = 'USUARIO';
  fld_Contactos_RefreshREFERENCIA = 'REFERENCIA';
  fld_Contactos_RefreshPERSONA_CONTACTO = 'PERSONA_CONTACTO';

  { Contactos_Refresh field indexes }
  idx_Contactos_RefreshID = 0;
  idx_Contactos_RefreshNIF_CIF = 1;
  idx_Contactos_RefreshNOMBRE = 2;
  idx_Contactos_RefreshCALLE = 3;
  idx_Contactos_RefreshPOBLACION = 4;
  idx_Contactos_RefreshPROVINCIA = 5;
  idx_Contactos_RefreshCODIGO_POSTAL = 6;
  idx_Contactos_RefreshPAIS = 7;
  idx_Contactos_RefreshTELEFONO_1 = 8;
  idx_Contactos_RefreshTELEFONO_2 = 9;
  idx_Contactos_RefreshMOVIL_1 = 10;
  idx_Contactos_RefreshMOVIL_2 = 11;
  idx_Contactos_RefreshFAX = 12;
  idx_Contactos_RefreshEMAIL_1 = 13;
  idx_Contactos_RefreshEMAIL_2 = 14;
  idx_Contactos_RefreshPAGINA_WEB = 15;
  idx_Contactos_RefreshNOTAS = 16;
  idx_Contactos_RefreshFECHA_ALTA = 17;
  idx_Contactos_RefreshFECHA_MODIFICACION = 18;
  idx_Contactos_RefreshUSUARIO = 19;
  idx_Contactos_RefreshREFERENCIA = 20;
  idx_Contactos_RefreshPERSONA_CONTACTO = 21;

type
  { IDarEmpresasContacto }
  IDarEmpresasContacto = interface(IDAStronglyTypedDataTable)
  ['{5A42E84A-726A-4C4C-B22D-E980B9E7B359}']
    { Property getters and setters }
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);


    { Properties }
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
  end;

  { TDarEmpresasContactoDataTableRules }
  TDarEmpresasContactoDataTableRules = class(TIntfObjectDADataTableRules, IDarEmpresasContacto)
  private
  protected
    { Property getters and setters }
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;

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

  end;

  { IPersonalContacto }
  IPersonalContacto = interface(IDAStronglyTypedDataTable)
  ['{7DC4AEEE-BA0A-4EDC-AEBD-B55F4387967D}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CONTACTOValue: Integer;
    procedure SetID_CONTACTOValue(const aValue: Integer);
    function GetID_CONTACTOIsNull: Boolean;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPUESTOValue: String;
    procedure SetPUESTOValue(const aValue: String);
    function GetPUESTOIsNull: Boolean;
    procedure SetPUESTOIsNull(const aValue: Boolean);
    function GetTELEFONOValue: String;
    procedure SetTELEFONOValue(const aValue: String);
    function GetTELEFONOIsNull: Boolean;
    procedure SetTELEFONOIsNull(const aValue: Boolean);
    function GetMOVILValue: String;
    procedure SetMOVILValue(const aValue: String);
    function GetMOVILIsNull: Boolean;
    procedure SetMOVILIsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAILValue: String;
    procedure SetEMAILValue(const aValue: String);
    function GetEMAILIsNull: Boolean;
    procedure SetEMAILIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PUESTO: String read GetPUESTOValue write SetPUESTOValue;
    property PUESTOIsNull: Boolean read GetPUESTOIsNull write SetPUESTOIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
  end;

  { TPersonalContactoDataTableRules }
  TPersonalContactoDataTableRules = class(TIntfObjectDADataTableRules, IPersonalContacto)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CONTACTOValue: Integer; virtual;
    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
    function GetID_CONTACTOIsNull: Boolean; virtual;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPUESTOValue: String; virtual;
    procedure SetPUESTOValue(const aValue: String); virtual;
    function GetPUESTOIsNull: Boolean; virtual;
    procedure SetPUESTOIsNull(const aValue: Boolean); virtual;
    function GetTELEFONOValue: String; virtual;
    procedure SetTELEFONOValue(const aValue: String); virtual;
    function GetTELEFONOIsNull: Boolean; virtual;
    procedure SetTELEFONOIsNull(const aValue: Boolean); virtual;
    function GetMOVILValue: String; virtual;
    procedure SetMOVILValue(const aValue: String); virtual;
    function GetMOVILIsNull: Boolean; virtual;
    procedure SetMOVILIsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAILValue: String; virtual;
    procedure SetEMAILValue(const aValue: String); virtual;
    function GetEMAILIsNull: Boolean; virtual;
    procedure SetEMAILIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PUESTO: String read GetPUESTOValue write SetPUESTOValue;
    property PUESTOIsNull: Boolean read GetPUESTOIsNull write SetPUESTOIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;

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

  end;

  { IDarTiendaDeUsuario }
  IDarTiendaDeUsuario = interface(IDAStronglyTypedDataTable)
  ['{5538F32E-DD6E-485A-BB2C-4626B8FAC737}']
    { Property getters and setters }
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);


    { Properties }
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
  end;

  { TDarTiendaDeUsuarioDataTableRules }
  TDarTiendaDeUsuarioDataTableRules = class(TIntfObjectDADataTableRules, IDarTiendaDeUsuario)
  private
  protected
    { Property getters and setters }
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;

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

  end;

  { ISubCuentasContacto }
  ISubCuentasContacto = interface(IDAStronglyTypedDataTable)
  ['{8359AD31-7AAC-47E3-A169-C9419C5DDFA0}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetREF_SUBCUENTAValue: String;
    procedure SetREF_SUBCUENTAValue(const aValue: String);
    function GetREF_SUBCUENTAIsNull: Boolean;
    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetDESCRIPCIONIsNull: Boolean;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
    function GetID_CUENTAValue: Integer;
    procedure SetID_CUENTAValue(const aValue: Integer);
    function GetID_CUENTAIsNull: Boolean;
    procedure SetID_CUENTAIsNull(const aValue: Boolean);
    function GetID_EJERCICIOValue: Integer;
    procedure SetID_EJERCICIOValue(const aValue: Integer);
    function GetID_EJERCICIOIsNull: Boolean;
    procedure SetID_EJERCICIOIsNull(const aValue: Boolean);
    function GetID_CONTACTOValue: Integer;
    procedure SetID_CONTACTOValue(const aValue: Integer);
    function GetID_CONTACTOIsNull: Boolean;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property REF_SUBCUENTA: String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
    property REF_SUBCUENTAIsNull: Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
    property ID_CUENTA: Integer read GetID_CUENTAValue write SetID_CUENTAValue;
    property ID_CUENTAIsNull: Boolean read GetID_CUENTAIsNull write SetID_CUENTAIsNull;
    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
  end;

  { TSubCuentasContactoDataTableRules }
  TSubCuentasContactoDataTableRules = class(TIntfObjectDADataTableRules, ISubCuentasContacto)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetREF_SUBCUENTAValue: String; virtual;
    procedure SetREF_SUBCUENTAValue(const aValue: String); virtual;
    function GetREF_SUBCUENTAIsNull: Boolean; virtual;
    procedure SetREF_SUBCUENTAIsNull(const aValue: Boolean); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetDESCRIPCIONIsNull: Boolean; virtual;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
    function GetID_CUENTAValue: Integer; virtual;
    procedure SetID_CUENTAValue(const aValue: Integer); virtual;
    function GetID_CUENTAIsNull: Boolean; virtual;
    procedure SetID_CUENTAIsNull(const aValue: Boolean); virtual;
    function GetID_EJERCICIOValue: Integer; virtual;
    procedure SetID_EJERCICIOValue(const aValue: Integer); virtual;
    function GetID_EJERCICIOIsNull: Boolean; virtual;
    procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual;
    function GetID_CONTACTOValue: Integer; virtual;
    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
    function GetID_CONTACTOIsNull: Boolean; virtual;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property REF_SUBCUENTA: String read GetREF_SUBCUENTAValue write SetREF_SUBCUENTAValue;
    property REF_SUBCUENTAIsNull: Boolean read GetREF_SUBCUENTAIsNull write SetREF_SUBCUENTAIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
    property ID_CUENTA: Integer read GetID_CUENTAValue write SetID_CUENTAValue;
    property ID_CUENTAIsNull: Boolean read GetID_CUENTAIsNull write SetID_CUENTAIsNull;
    property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue;
    property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;

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

  end;

  { IContactos }
  IContactos = interface(IDAStronglyTypedDataTable)
  ['{0A502C1B-871E-4A71-816A-7EC57A2FA071}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
  end;

  { TContactosDataTableRules }
  TContactosDataTableRules = class(TIntfObjectDADataTableRules, IContactos)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;

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

  end;

  { IGruposCliente }
  IGruposCliente = interface(IDAStronglyTypedDataTable)
  ['{32C57660-33DF-46CB-8DA6-AF8429274B17}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetDESCRIPCIONIsNull: Boolean;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
  end;

  { TGruposClienteDataTableRules }
  TGruposClienteDataTableRules = class(TIntfObjectDADataTableRules, IGruposCliente)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetDESCRIPCIONIsNull: Boolean; virtual;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;

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

  end;

  { IDatosBancarios }
  IDatosBancarios = interface(IDAStronglyTypedDataTable)
  ['{50526541-FBE8-4008-8F43-234E554FDC87}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CONTACTOValue: Integer;
    procedure SetID_CONTACTOValue(const aValue: Integer);
    function GetID_CONTACTOIsNull: Boolean;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean);
    function GetTITULARValue: String;
    procedure SetTITULARValue(const aValue: String);
    function GetTITULARIsNull: Boolean;
    procedure SetTITULARIsNull(const aValue: Boolean);
    function GetENTIDADValue: String;
    procedure SetENTIDADValue(const aValue: String);
    function GetENTIDADIsNull: Boolean;
    procedure SetENTIDADIsNull(const aValue: Boolean);
    function GetSUCURSALValue: String;
    procedure SetSUCURSALValue(const aValue: String);
    function GetSUCURSALIsNull: Boolean;
    procedure SetSUCURSALIsNull(const aValue: Boolean);
    function GetDCValue: String;
    procedure SetDCValue(const aValue: String);
    function GetDCIsNull: Boolean;
    procedure SetDCIsNull(const aValue: Boolean);
    function GetCUENTAValue: String;
    procedure SetCUENTAValue(const aValue: String);
    function GetCUENTAIsNull: Boolean;
    procedure SetCUENTAIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetIBANValue: String;
    procedure SetIBANValue(const aValue: String);
    function GetIBANIsNull: Boolean;
    procedure SetIBANIsNull(const aValue: Boolean);
    function GetSWIFTValue: String;
    procedure SetSWIFTValue(const aValue: String);
    function GetSWIFTIsNull: Boolean;
    procedure SetSWIFTIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property TITULAR: String read GetTITULARValue write SetTITULARValue;
    property TITULARIsNull: Boolean read GetTITULARIsNull write SetTITULARIsNull;
    property ENTIDAD: String read GetENTIDADValue write SetENTIDADValue;
    property ENTIDADIsNull: Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
    property SUCURSAL: String read GetSUCURSALValue write SetSUCURSALValue;
    property SUCURSALIsNull: Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
    property DC: String read GetDCValue write SetDCValue;
    property DCIsNull: Boolean read GetDCIsNull write SetDCIsNull;
    property CUENTA: String read GetCUENTAValue write SetCUENTAValue;
    property CUENTAIsNull: Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property IBAN: String read GetIBANValue write SetIBANValue;
    property IBANIsNull: Boolean read GetIBANIsNull write SetIBANIsNull;
    property SWIFT: String read GetSWIFTValue write SetSWIFTValue;
    property SWIFTIsNull: Boolean read GetSWIFTIsNull write SetSWIFTIsNull;
  end;

  { TDatosBancariosDataTableRules }
  TDatosBancariosDataTableRules = class(TIntfObjectDADataTableRules, IDatosBancarios)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CONTACTOValue: Integer; virtual;
    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
    function GetID_CONTACTOIsNull: Boolean; virtual;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetTITULARValue: String; virtual;
    procedure SetTITULARValue(const aValue: String); virtual;
    function GetTITULARIsNull: Boolean; virtual;
    procedure SetTITULARIsNull(const aValue: Boolean); virtual;
    function GetENTIDADValue: String; virtual;
    procedure SetENTIDADValue(const aValue: String); virtual;
    function GetENTIDADIsNull: Boolean; virtual;
    procedure SetENTIDADIsNull(const aValue: Boolean); virtual;
    function GetSUCURSALValue: String; virtual;
    procedure SetSUCURSALValue(const aValue: String); virtual;
    function GetSUCURSALIsNull: Boolean; virtual;
    procedure SetSUCURSALIsNull(const aValue: Boolean); virtual;
    function GetDCValue: String; virtual;
    procedure SetDCValue(const aValue: String); virtual;
    function GetDCIsNull: Boolean; virtual;
    procedure SetDCIsNull(const aValue: Boolean); virtual;
    function GetCUENTAValue: String; virtual;
    procedure SetCUENTAValue(const aValue: String); virtual;
    function GetCUENTAIsNull: Boolean; virtual;
    procedure SetCUENTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetIBANValue: String; virtual;
    procedure SetIBANValue(const aValue: String); virtual;
    function GetIBANIsNull: Boolean; virtual;
    procedure SetIBANIsNull(const aValue: Boolean); virtual;
    function GetSWIFTValue: String; virtual;
    procedure SetSWIFTValue(const aValue: String); virtual;
    function GetSWIFTIsNull: Boolean; virtual;
    procedure SetSWIFTIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property TITULAR: String read GetTITULARValue write SetTITULARValue;
    property TITULARIsNull: Boolean read GetTITULARIsNull write SetTITULARIsNull;
    property ENTIDAD: String read GetENTIDADValue write SetENTIDADValue;
    property ENTIDADIsNull: Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
    property SUCURSAL: String read GetSUCURSALValue write SetSUCURSALValue;
    property SUCURSALIsNull: Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
    property DC: String read GetDCValue write SetDCValue;
    property DCIsNull: Boolean read GetDCIsNull write SetDCIsNull;
    property CUENTA: String read GetCUENTAValue write SetCUENTAValue;
    property CUENTAIsNull: Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property IBAN: String read GetIBANValue write SetIBANValue;
    property IBANIsNull: Boolean read GetIBANIsNull write SetIBANIsNull;
    property SWIFT: String read GetSWIFTValue write SetSWIFTValue;
    property SWIFTIsNull: Boolean read GetSWIFTIsNull write SetSWIFTIsNull;

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

  end;

  { IContactosDirecciones }
  IContactosDirecciones = interface(IDAStronglyTypedDataTable)
  ['{3B309B93-5971-462D-B3D9-85B61CD5A591}']
    { Property getters and setters }
    function GetID_CONTACTOValue: Integer;
    procedure SetID_CONTACTOValue(const aValue: Integer);
    function GetID_CONTACTOIsNull: Boolean;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean);
    function GetID_DIRECCIONValue: Integer;
    procedure SetID_DIRECCIONValue(const aValue: Integer);
    function GetID_DIRECCIONIsNull: Boolean;
    procedure SetID_DIRECCIONIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetTELEFONOValue: String;
    procedure SetTELEFONOValue(const aValue: String);
    function GetTELEFONOIsNull: Boolean;
    procedure SetTELEFONOIsNull(const aValue: Boolean);
    function GetMOVILValue: String;
    procedure SetMOVILValue(const aValue: String);
    function GetMOVILIsNull: Boolean;
    procedure SetMOVILIsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAILValue: String;
    procedure SetEMAILValue(const aValue: String);
    function GetEMAILIsNull: Boolean;
    procedure SetEMAILIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);


    { Properties }
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property ID_DIRECCION: Integer read GetID_DIRECCIONValue write SetID_DIRECCIONValue;
    property ID_DIRECCIONIsNull: Boolean read GetID_DIRECCIONIsNull write SetID_DIRECCIONIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
  end;

  { TContactosDireccionesDataTableRules }
  TContactosDireccionesDataTableRules = class(TIntfObjectDADataTableRules, IContactosDirecciones)
  private
  protected
    { Property getters and setters }
    function GetID_CONTACTOValue: Integer; virtual;
    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
    function GetID_CONTACTOIsNull: Boolean; virtual;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetID_DIRECCIONValue: Integer; virtual;
    procedure SetID_DIRECCIONValue(const aValue: Integer); virtual;
    function GetID_DIRECCIONIsNull: Boolean; virtual;
    procedure SetID_DIRECCIONIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetTELEFONOValue: String; virtual;
    procedure SetTELEFONOValue(const aValue: String); virtual;
    function GetTELEFONOIsNull: Boolean; virtual;
    procedure SetTELEFONOIsNull(const aValue: Boolean); virtual;
    function GetMOVILValue: String; virtual;
    procedure SetMOVILValue(const aValue: String); virtual;
    function GetMOVILIsNull: Boolean; virtual;
    procedure SetMOVILIsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAILValue: String; virtual;
    procedure SetEMAILValue(const aValue: String); virtual;
    function GetEMAILIsNull: Boolean; virtual;
    procedure SetEMAILIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property ID_DIRECCION: Integer read GetID_DIRECCIONValue write SetID_DIRECCIONValue;
    property ID_DIRECCIONIsNull: Boolean read GetID_DIRECCIONIsNull write SetID_DIRECCIONIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;

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

  end;

  { IClientes }
  IClientes = interface(IDAStronglyTypedDataTable)
  ['{7135CE4A-8380-4CD6-AB27-7D7E003309CC}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);
    function GetGRUPO_CLIENTEValue: String;
    procedure SetGRUPO_CLIENTEValue(const aValue: String);
    function GetGRUPO_CLIENTEIsNull: Boolean;
    procedure SetGRUPO_CLIENTEIsNull(const aValue: Boolean);
    function GetNOMBRE_COMERCIALValue: String;
    procedure SetNOMBRE_COMERCIALValue(const aValue: String);
    function GetNOMBRE_COMERCIALIsNull: Boolean;
    procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean);
    function GetBLOQUEADOValue: SmallInt;
    procedure SetBLOQUEADOValue(const aValue: SmallInt);
    function GetBLOQUEADOIsNull: Boolean;
    procedure SetBLOQUEADOIsNull(const aValue: Boolean);
    function GetREGIMEN_IVAValue: String;
    procedure SetREGIMEN_IVAValue(const aValue: String);
    function GetREGIMEN_IVAIsNull: Boolean;
    procedure SetREGIMEN_IVAIsNull(const aValue: Boolean);
    function GetMOTIVO_BLOQUEOValue: String;
    procedure SetMOTIVO_BLOQUEOValue(const aValue: String);
    function GetMOTIVO_BLOQUEOIsNull: Boolean;
    procedure SetMOTIVO_BLOQUEOIsNull(const aValue: Boolean);
    function GetRECARGO_EQUIVALENCIAValue: SmallInt;
    procedure SetRECARGO_EQUIVALENCIAValue(const aValue: SmallInt);
    function GetRECARGO_EQUIVALENCIAIsNull: Boolean;
    procedure SetRECARGO_EQUIVALENCIAIsNull(const aValue: Boolean);
    function GetID_TIPO_IVAValue: Integer;
    procedure SetID_TIPO_IVAValue(const aValue: Integer);
    function GetID_TIPO_IVAIsNull: Boolean;
    procedure SetID_TIPO_IVAIsNull(const aValue: Boolean);
    function GetID_FORMA_PAGOValue: Integer;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer);
    function GetID_FORMA_PAGOIsNull: Boolean;
    procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean);
    function GetTIENDA_WEBValue: SmallInt;
    procedure SetTIENDA_WEBValue(const aValue: SmallInt);
    function GetTIENDA_WEBIsNull: Boolean;
    procedure SetTIENDA_WEBIsNull(const aValue: Boolean);
    function GetCODIGO_ASIGNADOValue: String;
    procedure SetCODIGO_ASIGNADOValue(const aValue: String);
    function GetCODIGO_ASIGNADOIsNull: Boolean;
    procedure SetCODIGO_ASIGNADOIsNull(const aValue: Boolean);
    function GetIGNORAR_CONTABILIDADValue: Integer;
    procedure SetIGNORAR_CONTABILIDADValue(const aValue: Integer);
    function GetIGNORAR_CONTABILIDADIsNull: Boolean;
    procedure SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean);
    function GetTIENE_SUBCUENTAValue: Integer;
    procedure SetTIENE_SUBCUENTAValue(const aValue: Integer);
    function GetTIENE_SUBCUENTAIsNull: Boolean;
    procedure SetTIENE_SUBCUENTAIsNull(const aValue: Boolean);
    function GetPROCEDENCIA_CLIENTEValue: String;
    procedure SetPROCEDENCIA_CLIENTEValue(const aValue: String);
    function GetPROCEDENCIA_CLIENTEIsNull: Boolean;
    procedure SetPROCEDENCIA_CLIENTEIsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_1Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_1IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_2Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_2IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_3Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetDESCUENTOIsNull: Boolean;
    procedure SetDESCUENTOIsNull(const aValue: Boolean);
    function GetDESCUENTO_LINEAValue: Float;
    procedure SetDESCUENTO_LINEAValue(const aValue: Float);
    function GetDESCUENTO_LINEAIsNull: Boolean;
    procedure SetDESCUENTO_LINEAIsNull(const aValue: Boolean);
    function GetPRECIO_PUNTOValue: Currency;
    procedure SetPRECIO_PUNTOValue(const aValue: Currency);
    function GetPRECIO_PUNTOIsNull: Boolean;
    procedure SetPRECIO_PUNTOIsNull(const aValue: Boolean);
    function GetID_AGENTEValue: Integer;
    procedure SetID_AGENTEValue(const aValue: Integer);
    function GetID_AGENTEIsNull: Boolean;
    procedure SetID_AGENTEIsNull(const aValue: Boolean);
    function GetAGENTEValue: String;
    procedure SetAGENTEValue(const aValue: String);
    function GetAGENTEIsNull: Boolean;
    procedure SetAGENTEIsNull(const aValue: Boolean);
    function GetDELEGACIONValue: String;
    procedure SetDELEGACIONValue(const aValue: String);
    function GetDELEGACIONIsNull: Boolean;
    procedure SetDELEGACIONIsNull(const aValue: Boolean);
    function GetDESCUENTO_CAPITULOValue: Float;
    procedure SetDESCUENTO_CAPITULOValue(const aValue: Float);
    function GetDESCUENTO_CAPITULOIsNull: Boolean;
    procedure SetDESCUENTO_CAPITULOIsNull(const aValue: Boolean);
    function GetDIST_EMAILValue: String;
    procedure SetDIST_EMAILValue(const aValue: String);
    function GetDIST_EMAILIsNull: Boolean;
    procedure SetDIST_EMAILIsNull(const aValue: Boolean);
    function GetDIST_PASSWORDValue: String;
    procedure SetDIST_PASSWORDValue(const aValue: String);
    function GetDIST_PASSWORDIsNull: Boolean;
    procedure SetDIST_PASSWORDIsNull(const aValue: Boolean);
    function GetDIST_VALIDEZValue: String;
    procedure SetDIST_VALIDEZValue(const aValue: String);
    function GetDIST_VALIDEZIsNull: Boolean;
    procedure SetDIST_VALIDEZIsNull(const aValue: Boolean);
    function GetDIST_FORMA_PAGOValue: IROStrings;
    function GetDIST_FORMA_PAGOIsNull: Boolean;
    procedure SetDIST_FORMA_PAGOIsNull(const aValue: Boolean);
    function GetDIST_NOTASValue: IROStrings;
    function GetDIST_NOTASIsNull: Boolean;
    procedure SetDIST_NOTASIsNull(const aValue: Boolean);
    function GetDIST_LOPDValue: IROStrings;
    function GetDIST_LOPDIsNull: Boolean;
    procedure SetDIST_LOPDIsNull(const aValue: Boolean);
    function GetDIST_CONDICIONESValue: IROStrings;
    function GetDIST_CONDICIONESIsNull: Boolean;
    procedure SetDIST_CONDICIONESIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property GRUPO_CLIENTE: String read GetGRUPO_CLIENTEValue write SetGRUPO_CLIENTEValue;
    property GRUPO_CLIENTEIsNull: Boolean read GetGRUPO_CLIENTEIsNull write SetGRUPO_CLIENTEIsNull;
    property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
    property NOMBRE_COMERCIALIsNull: Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull;
    property BLOQUEADO: SmallInt read GetBLOQUEADOValue write SetBLOQUEADOValue;
    property BLOQUEADOIsNull: Boolean read GetBLOQUEADOIsNull write SetBLOQUEADOIsNull;
    property REGIMEN_IVA: String read GetREGIMEN_IVAValue write SetREGIMEN_IVAValue;
    property REGIMEN_IVAIsNull: Boolean read GetREGIMEN_IVAIsNull write SetREGIMEN_IVAIsNull;
    property MOTIVO_BLOQUEO: String read GetMOTIVO_BLOQUEOValue write SetMOTIVO_BLOQUEOValue;
    property MOTIVO_BLOQUEOIsNull: Boolean read GetMOTIVO_BLOQUEOIsNull write SetMOTIVO_BLOQUEOIsNull;
    property RECARGO_EQUIVALENCIA: SmallInt read GetRECARGO_EQUIVALENCIAValue write SetRECARGO_EQUIVALENCIAValue;
    property RECARGO_EQUIVALENCIAIsNull: Boolean read GetRECARGO_EQUIVALENCIAIsNull write SetRECARGO_EQUIVALENCIAIsNull;
    property ID_TIPO_IVA: Integer read GetID_TIPO_IVAValue write SetID_TIPO_IVAValue;
    property ID_TIPO_IVAIsNull: Boolean read GetID_TIPO_IVAIsNull write SetID_TIPO_IVAIsNull;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
    property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
    property TIENDA_WEB: SmallInt read GetTIENDA_WEBValue write SetTIENDA_WEBValue;
    property TIENDA_WEBIsNull: Boolean read GetTIENDA_WEBIsNull write SetTIENDA_WEBIsNull;
    property CODIGO_ASIGNADO: String read GetCODIGO_ASIGNADOValue write SetCODIGO_ASIGNADOValue;
    property CODIGO_ASIGNADOIsNull: Boolean read GetCODIGO_ASIGNADOIsNull write SetCODIGO_ASIGNADOIsNull;
    property IGNORAR_CONTABILIDAD: Integer read GetIGNORAR_CONTABILIDADValue write SetIGNORAR_CONTABILIDADValue;
    property IGNORAR_CONTABILIDADIsNull: Boolean read GetIGNORAR_CONTABILIDADIsNull write SetIGNORAR_CONTABILIDADIsNull;
    property TIENE_SUBCUENTA: Integer read GetTIENE_SUBCUENTAValue write SetTIENE_SUBCUENTAValue;
    property TIENE_SUBCUENTAIsNull: Boolean read GetTIENE_SUBCUENTAIsNull write SetTIENE_SUBCUENTAIsNull;
    property PROCEDENCIA_CLIENTE: String read GetPROCEDENCIA_CLIENTEValue write SetPROCEDENCIA_CLIENTEValue;
    property PROCEDENCIA_CLIENTEIsNull: Boolean read GetPROCEDENCIA_CLIENTEIsNull write SetPROCEDENCIA_CLIENTEIsNull;
    property VENCIMIENTO_FACTURAS_1: Integer read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
    property VENCIMIENTO_FACTURAS_1IsNull: Boolean read GetVENCIMIENTO_FACTURAS_1IsNull write SetVENCIMIENTO_FACTURAS_1IsNull;
    property VENCIMIENTO_FACTURAS_2: Integer read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
    property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
    property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
    property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
    property DESCUENTO_LINEA: Float read GetDESCUENTO_LINEAValue write SetDESCUENTO_LINEAValue;
    property DESCUENTO_LINEAIsNull: Boolean read GetDESCUENTO_LINEAIsNull write SetDESCUENTO_LINEAIsNull;
    property PRECIO_PUNTO: Currency read GetPRECIO_PUNTOValue write SetPRECIO_PUNTOValue;
    property PRECIO_PUNTOIsNull: Boolean read GetPRECIO_PUNTOIsNull write SetPRECIO_PUNTOIsNull;
    property ID_AGENTE: Integer read GetID_AGENTEValue write SetID_AGENTEValue;
    property ID_AGENTEIsNull: Boolean read GetID_AGENTEIsNull write SetID_AGENTEIsNull;
    property AGENTE: String read GetAGENTEValue write SetAGENTEValue;
    property AGENTEIsNull: Boolean read GetAGENTEIsNull write SetAGENTEIsNull;
    property DELEGACION: String read GetDELEGACIONValue write SetDELEGACIONValue;
    property DELEGACIONIsNull: Boolean read GetDELEGACIONIsNull write SetDELEGACIONIsNull;
    property DESCUENTO_CAPITULO: Float read GetDESCUENTO_CAPITULOValue write SetDESCUENTO_CAPITULOValue;
    property DESCUENTO_CAPITULOIsNull: Boolean read GetDESCUENTO_CAPITULOIsNull write SetDESCUENTO_CAPITULOIsNull;
    property DIST_EMAIL: String read GetDIST_EMAILValue write SetDIST_EMAILValue;
    property DIST_EMAILIsNull: Boolean read GetDIST_EMAILIsNull write SetDIST_EMAILIsNull;
    property DIST_PASSWORD: String read GetDIST_PASSWORDValue write SetDIST_PASSWORDValue;
    property DIST_PASSWORDIsNull: Boolean read GetDIST_PASSWORDIsNull write SetDIST_PASSWORDIsNull;
    property DIST_VALIDEZ: String read GetDIST_VALIDEZValue write SetDIST_VALIDEZValue;
    property DIST_VALIDEZIsNull: Boolean read GetDIST_VALIDEZIsNull write SetDIST_VALIDEZIsNull;
    property DIST_FORMA_PAGO: IROStrings read GetDIST_FORMA_PAGOValue;
    property DIST_FORMA_PAGOIsNull: Boolean read GetDIST_FORMA_PAGOIsNull write SetDIST_FORMA_PAGOIsNull;
    property DIST_NOTAS: IROStrings read GetDIST_NOTASValue;
    property DIST_NOTASIsNull: Boolean read GetDIST_NOTASIsNull write SetDIST_NOTASIsNull;
    property DIST_LOPD: IROStrings read GetDIST_LOPDValue;
    property DIST_LOPDIsNull: Boolean read GetDIST_LOPDIsNull write SetDIST_LOPDIsNull;
    property DIST_CONDICIONES: IROStrings read GetDIST_CONDICIONESValue;
    property DIST_CONDICIONESIsNull: Boolean read GetDIST_CONDICIONESIsNull write SetDIST_CONDICIONESIsNull;
  end;

  { TClientesDataTableRules }
  TClientesDataTableRules = class(TIntfObjectDADataTableRules, IClientes)
  private
    f_NOTAS: IROStrings;
    f_DIST_FORMA_PAGO: IROStrings;
    f_DIST_NOTAS: IROStrings;
    f_DIST_LOPD: IROStrings;
    f_DIST_CONDICIONES: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
    procedure DIST_FORMA_PAGO_OnChange(Sender: TObject);
    procedure DIST_NOTAS_OnChange(Sender: TObject);
    procedure DIST_LOPD_OnChange(Sender: TObject);
    procedure DIST_CONDICIONES_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_CLIENTEValue: String; virtual;
    procedure SetGRUPO_CLIENTEValue(const aValue: String); virtual;
    function GetGRUPO_CLIENTEIsNull: Boolean; virtual;
    procedure SetGRUPO_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetNOMBRE_COMERCIALValue: String; virtual;
    procedure SetNOMBRE_COMERCIALValue(const aValue: String); virtual;
    function GetNOMBRE_COMERCIALIsNull: Boolean; virtual;
    procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); virtual;
    function GetBLOQUEADOValue: SmallInt; virtual;
    procedure SetBLOQUEADOValue(const aValue: SmallInt); virtual;
    function GetBLOQUEADOIsNull: Boolean; virtual;
    procedure SetBLOQUEADOIsNull(const aValue: Boolean); virtual;
    function GetREGIMEN_IVAValue: String; virtual;
    procedure SetREGIMEN_IVAValue(const aValue: String); virtual;
    function GetREGIMEN_IVAIsNull: Boolean; virtual;
    procedure SetREGIMEN_IVAIsNull(const aValue: Boolean); virtual;
    function GetMOTIVO_BLOQUEOValue: String; virtual;
    procedure SetMOTIVO_BLOQUEOValue(const aValue: String); virtual;
    function GetMOTIVO_BLOQUEOIsNull: Boolean; virtual;
    procedure SetMOTIVO_BLOQUEOIsNull(const aValue: Boolean); virtual;
    function GetRECARGO_EQUIVALENCIAValue: SmallInt; virtual;
    procedure SetRECARGO_EQUIVALENCIAValue(const aValue: SmallInt); virtual;
    function GetRECARGO_EQUIVALENCIAIsNull: Boolean; virtual;
    procedure SetRECARGO_EQUIVALENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIPO_IVAValue: Integer; virtual;
    procedure SetID_TIPO_IVAValue(const aValue: Integer); virtual;
    function GetID_TIPO_IVAIsNull: Boolean; virtual;
    procedure SetID_TIPO_IVAIsNull(const aValue: Boolean); virtual;
    function GetID_FORMA_PAGOValue: Integer; virtual;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer); virtual;
    function GetID_FORMA_PAGOIsNull: Boolean; virtual;
    procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean); virtual;
    function GetTIENDA_WEBValue: SmallInt; virtual;
    procedure SetTIENDA_WEBValue(const aValue: SmallInt); virtual;
    function GetTIENDA_WEBIsNull: Boolean; virtual;
    procedure SetTIENDA_WEBIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_ASIGNADOValue: String; virtual;
    procedure SetCODIGO_ASIGNADOValue(const aValue: String); virtual;
    function GetCODIGO_ASIGNADOIsNull: Boolean; virtual;
    procedure SetCODIGO_ASIGNADOIsNull(const aValue: Boolean); virtual;
    function GetIGNORAR_CONTABILIDADValue: Integer; virtual;
    procedure SetIGNORAR_CONTABILIDADValue(const aValue: Integer); virtual;
    function GetIGNORAR_CONTABILIDADIsNull: Boolean; virtual;
    procedure SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean); virtual;
    function GetTIENE_SUBCUENTAValue: Integer; virtual;
    procedure SetTIENE_SUBCUENTAValue(const aValue: Integer); virtual;
    function GetTIENE_SUBCUENTAIsNull: Boolean; virtual;
    procedure SetTIENE_SUBCUENTAIsNull(const aValue: Boolean); virtual;
    function GetPROCEDENCIA_CLIENTEValue: String; virtual;
    procedure SetPROCEDENCIA_CLIENTEValue(const aValue: String); virtual;
    function GetPROCEDENCIA_CLIENTEIsNull: Boolean; virtual;
    procedure SetPROCEDENCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_1Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_1IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_2Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_2IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_3Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetDESCUENTOIsNull: Boolean; virtual;
    procedure SetDESCUENTOIsNull(const aValue: Boolean); virtual;
    function GetDESCUENTO_LINEAValue: Float; virtual;
    procedure SetDESCUENTO_LINEAValue(const aValue: Float); virtual;
    function GetDESCUENTO_LINEAIsNull: Boolean; virtual;
    procedure SetDESCUENTO_LINEAIsNull(const aValue: Boolean); virtual;
    function GetPRECIO_PUNTOValue: Currency; virtual;
    procedure SetPRECIO_PUNTOValue(const aValue: Currency); virtual;
    function GetPRECIO_PUNTOIsNull: Boolean; virtual;
    procedure SetPRECIO_PUNTOIsNull(const aValue: Boolean); virtual;
    function GetID_AGENTEValue: Integer; virtual;
    procedure SetID_AGENTEValue(const aValue: Integer); virtual;
    function GetID_AGENTEIsNull: Boolean; virtual;
    procedure SetID_AGENTEIsNull(const aValue: Boolean); virtual;
    function GetAGENTEValue: String; virtual;
    procedure SetAGENTEValue(const aValue: String); virtual;
    function GetAGENTEIsNull: Boolean; virtual;
    procedure SetAGENTEIsNull(const aValue: Boolean); virtual;
    function GetDELEGACIONValue: String; virtual;
    procedure SetDELEGACIONValue(const aValue: String); virtual;
    function GetDELEGACIONIsNull: Boolean; virtual;
    procedure SetDELEGACIONIsNull(const aValue: Boolean); virtual;
    function GetDESCUENTO_CAPITULOValue: Float; virtual;
    procedure SetDESCUENTO_CAPITULOValue(const aValue: Float); virtual;
    function GetDESCUENTO_CAPITULOIsNull: Boolean; virtual;
    procedure SetDESCUENTO_CAPITULOIsNull(const aValue: Boolean); virtual;
    function GetDIST_EMAILValue: String; virtual;
    procedure SetDIST_EMAILValue(const aValue: String); virtual;
    function GetDIST_EMAILIsNull: Boolean; virtual;
    procedure SetDIST_EMAILIsNull(const aValue: Boolean); virtual;
    function GetDIST_PASSWORDValue: String; virtual;
    procedure SetDIST_PASSWORDValue(const aValue: String); virtual;
    function GetDIST_PASSWORDIsNull: Boolean; virtual;
    procedure SetDIST_PASSWORDIsNull(const aValue: Boolean); virtual;
    function GetDIST_VALIDEZValue: String; virtual;
    procedure SetDIST_VALIDEZValue(const aValue: String); virtual;
    function GetDIST_VALIDEZIsNull: Boolean; virtual;
    procedure SetDIST_VALIDEZIsNull(const aValue: Boolean); virtual;
    function GetDIST_FORMA_PAGOValue: IROStrings; virtual;
    function GetDIST_FORMA_PAGOIsNull: Boolean; virtual;
    procedure SetDIST_FORMA_PAGOIsNull(const aValue: Boolean); virtual;
    function GetDIST_NOTASValue: IROStrings; virtual;
    function GetDIST_NOTASIsNull: Boolean; virtual;
    procedure SetDIST_NOTASIsNull(const aValue: Boolean); virtual;
    function GetDIST_LOPDValue: IROStrings; virtual;
    function GetDIST_LOPDIsNull: Boolean; virtual;
    procedure SetDIST_LOPDIsNull(const aValue: Boolean); virtual;
    function GetDIST_CONDICIONESValue: IROStrings; virtual;
    function GetDIST_CONDICIONESIsNull: Boolean; virtual;
    procedure SetDIST_CONDICIONESIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property GRUPO_CLIENTE: String read GetGRUPO_CLIENTEValue write SetGRUPO_CLIENTEValue;
    property GRUPO_CLIENTEIsNull: Boolean read GetGRUPO_CLIENTEIsNull write SetGRUPO_CLIENTEIsNull;
    property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
    property NOMBRE_COMERCIALIsNull: Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull;
    property BLOQUEADO: SmallInt read GetBLOQUEADOValue write SetBLOQUEADOValue;
    property BLOQUEADOIsNull: Boolean read GetBLOQUEADOIsNull write SetBLOQUEADOIsNull;
    property REGIMEN_IVA: String read GetREGIMEN_IVAValue write SetREGIMEN_IVAValue;
    property REGIMEN_IVAIsNull: Boolean read GetREGIMEN_IVAIsNull write SetREGIMEN_IVAIsNull;
    property MOTIVO_BLOQUEO: String read GetMOTIVO_BLOQUEOValue write SetMOTIVO_BLOQUEOValue;
    property MOTIVO_BLOQUEOIsNull: Boolean read GetMOTIVO_BLOQUEOIsNull write SetMOTIVO_BLOQUEOIsNull;
    property RECARGO_EQUIVALENCIA: SmallInt read GetRECARGO_EQUIVALENCIAValue write SetRECARGO_EQUIVALENCIAValue;
    property RECARGO_EQUIVALENCIAIsNull: Boolean read GetRECARGO_EQUIVALENCIAIsNull write SetRECARGO_EQUIVALENCIAIsNull;
    property ID_TIPO_IVA: Integer read GetID_TIPO_IVAValue write SetID_TIPO_IVAValue;
    property ID_TIPO_IVAIsNull: Boolean read GetID_TIPO_IVAIsNull write SetID_TIPO_IVAIsNull;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
    property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
    property TIENDA_WEB: SmallInt read GetTIENDA_WEBValue write SetTIENDA_WEBValue;
    property TIENDA_WEBIsNull: Boolean read GetTIENDA_WEBIsNull write SetTIENDA_WEBIsNull;
    property CODIGO_ASIGNADO: String read GetCODIGO_ASIGNADOValue write SetCODIGO_ASIGNADOValue;
    property CODIGO_ASIGNADOIsNull: Boolean read GetCODIGO_ASIGNADOIsNull write SetCODIGO_ASIGNADOIsNull;
    property IGNORAR_CONTABILIDAD: Integer read GetIGNORAR_CONTABILIDADValue write SetIGNORAR_CONTABILIDADValue;
    property IGNORAR_CONTABILIDADIsNull: Boolean read GetIGNORAR_CONTABILIDADIsNull write SetIGNORAR_CONTABILIDADIsNull;
    property TIENE_SUBCUENTA: Integer read GetTIENE_SUBCUENTAValue write SetTIENE_SUBCUENTAValue;
    property TIENE_SUBCUENTAIsNull: Boolean read GetTIENE_SUBCUENTAIsNull write SetTIENE_SUBCUENTAIsNull;
    property PROCEDENCIA_CLIENTE: String read GetPROCEDENCIA_CLIENTEValue write SetPROCEDENCIA_CLIENTEValue;
    property PROCEDENCIA_CLIENTEIsNull: Boolean read GetPROCEDENCIA_CLIENTEIsNull write SetPROCEDENCIA_CLIENTEIsNull;
    property VENCIMIENTO_FACTURAS_1: Integer read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
    property VENCIMIENTO_FACTURAS_1IsNull: Boolean read GetVENCIMIENTO_FACTURAS_1IsNull write SetVENCIMIENTO_FACTURAS_1IsNull;
    property VENCIMIENTO_FACTURAS_2: Integer read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
    property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
    property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
    property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
    property DESCUENTO_LINEA: Float read GetDESCUENTO_LINEAValue write SetDESCUENTO_LINEAValue;
    property DESCUENTO_LINEAIsNull: Boolean read GetDESCUENTO_LINEAIsNull write SetDESCUENTO_LINEAIsNull;
    property PRECIO_PUNTO: Currency read GetPRECIO_PUNTOValue write SetPRECIO_PUNTOValue;
    property PRECIO_PUNTOIsNull: Boolean read GetPRECIO_PUNTOIsNull write SetPRECIO_PUNTOIsNull;
    property ID_AGENTE: Integer read GetID_AGENTEValue write SetID_AGENTEValue;
    property ID_AGENTEIsNull: Boolean read GetID_AGENTEIsNull write SetID_AGENTEIsNull;
    property AGENTE: String read GetAGENTEValue write SetAGENTEValue;
    property AGENTEIsNull: Boolean read GetAGENTEIsNull write SetAGENTEIsNull;
    property DELEGACION: String read GetDELEGACIONValue write SetDELEGACIONValue;
    property DELEGACIONIsNull: Boolean read GetDELEGACIONIsNull write SetDELEGACIONIsNull;
    property DESCUENTO_CAPITULO: Float read GetDESCUENTO_CAPITULOValue write SetDESCUENTO_CAPITULOValue;
    property DESCUENTO_CAPITULOIsNull: Boolean read GetDESCUENTO_CAPITULOIsNull write SetDESCUENTO_CAPITULOIsNull;
    property DIST_EMAIL: String read GetDIST_EMAILValue write SetDIST_EMAILValue;
    property DIST_EMAILIsNull: Boolean read GetDIST_EMAILIsNull write SetDIST_EMAILIsNull;
    property DIST_PASSWORD: String read GetDIST_PASSWORDValue write SetDIST_PASSWORDValue;
    property DIST_PASSWORDIsNull: Boolean read GetDIST_PASSWORDIsNull write SetDIST_PASSWORDIsNull;
    property DIST_VALIDEZ: String read GetDIST_VALIDEZValue write SetDIST_VALIDEZValue;
    property DIST_VALIDEZIsNull: Boolean read GetDIST_VALIDEZIsNull write SetDIST_VALIDEZIsNull;
    property DIST_FORMA_PAGO: IROStrings read GetDIST_FORMA_PAGOValue;
    property DIST_FORMA_PAGOIsNull: Boolean read GetDIST_FORMA_PAGOIsNull write SetDIST_FORMA_PAGOIsNull;
    property DIST_NOTAS: IROStrings read GetDIST_NOTASValue;
    property DIST_NOTASIsNull: Boolean read GetDIST_NOTASIsNull write SetDIST_NOTASIsNull;
    property DIST_LOPD: IROStrings read GetDIST_LOPDValue;
    property DIST_LOPDIsNull: Boolean read GetDIST_LOPDIsNull write SetDIST_LOPDIsNull;
    property DIST_CONDICIONES: IROStrings read GetDIST_CONDICIONESValue;
    property DIST_CONDICIONESIsNull: Boolean read GetDIST_CONDICIONESIsNull write SetDIST_CONDICIONESIsNull;

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

  end;

  { IProveedores }
  IProveedores = interface(IDAStronglyTypedDataTable)
  ['{1716C0C8-11E1-4B43-96EC-283AADB3501E}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetDESCUENTOIsNull: Boolean;
    procedure SetDESCUENTOIsNull(const aValue: Boolean);
    function GetDESCRIPCION_PROVEEDORValue: String;
    procedure SetDESCRIPCION_PROVEEDORValue(const aValue: String);
    function GetDESCRIPCION_PROVEEDORIsNull: Boolean;
    procedure SetDESCRIPCION_PROVEEDORIsNull(const aValue: Boolean);
    function GetCODIGO_ASIGNADOValue: String;
    procedure SetCODIGO_ASIGNADOValue(const aValue: String);
    function GetCODIGO_ASIGNADOIsNull: Boolean;
    procedure SetCODIGO_ASIGNADOIsNull(const aValue: Boolean);
    function GetGRUPO_PROVEEDORValue: String;
    procedure SetGRUPO_PROVEEDORValue(const aValue: String);
    function GetGRUPO_PROVEEDORIsNull: Boolean;
    procedure SetGRUPO_PROVEEDORIsNull(const aValue: Boolean);
    function GetREGIMEN_IVAValue: String;
    procedure SetREGIMEN_IVAValue(const aValue: String);
    function GetREGIMEN_IVAIsNull: Boolean;
    procedure SetREGIMEN_IVAIsNull(const aValue: Boolean);
    function GetID_TIPO_IVAValue: Integer;
    procedure SetID_TIPO_IVAValue(const aValue: Integer);
    function GetID_TIPO_IVAIsNull: Boolean;
    procedure SetID_TIPO_IVAIsNull(const aValue: Boolean);
    function GetID_FORMA_PAGOValue: Integer;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer);
    function GetID_FORMA_PAGOIsNull: Boolean;
    procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean);
    function GetTIENDA_WEBValue: SmallInt;
    procedure SetTIENDA_WEBValue(const aValue: SmallInt);
    function GetTIENDA_WEBIsNull: Boolean;
    procedure SetTIENDA_WEBIsNull(const aValue: Boolean);
    function GetHOMOLOGADOValue: SmallInt;
    procedure SetHOMOLOGADOValue(const aValue: SmallInt);
    function GetHOMOLOGADOIsNull: Boolean;
    procedure SetHOMOLOGADOIsNull(const aValue: Boolean);
    function GetCERTIFICACIONValue: String;
    procedure SetCERTIFICACIONValue(const aValue: String);
    function GetCERTIFICACIONIsNull: Boolean;
    procedure SetCERTIFICACIONIsNull(const aValue: Boolean);
    function GetIGNORAR_CONTABILIDADValue: Integer;
    procedure SetIGNORAR_CONTABILIDADValue(const aValue: Integer);
    function GetIGNORAR_CONTABILIDADIsNull: Boolean;
    procedure SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean);
    function GetTIENE_SUBCUENTAValue: Integer;
    procedure SetTIENE_SUBCUENTAValue(const aValue: Integer);
    function GetTIENE_SUBCUENTAIsNull: Boolean;
    procedure SetTIENE_SUBCUENTAIsNull(const aValue: Boolean);
    function GetNOMBRE_COMERCIALValue: String;
    procedure SetNOMBRE_COMERCIALValue(const aValue: String);
    function GetNOMBRE_COMERCIALIsNull: Boolean;
    procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean);
    function GetES_ACREEDORValue: SmallInt;
    procedure SetES_ACREEDORValue(const aValue: SmallInt);
    function GetES_ACREEDORIsNull: Boolean;
    procedure SetES_ACREEDORIsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_1Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_1IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_2Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_2IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean);
    function GetVENCIMIENTO_FACTURAS_3Value: Integer;
    procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer);
    function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean;
    procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
    property DESCRIPCION_PROVEEDOR: String read GetDESCRIPCION_PROVEEDORValue write SetDESCRIPCION_PROVEEDORValue;
    property DESCRIPCION_PROVEEDORIsNull: Boolean read GetDESCRIPCION_PROVEEDORIsNull write SetDESCRIPCION_PROVEEDORIsNull;
    property CODIGO_ASIGNADO: String read GetCODIGO_ASIGNADOValue write SetCODIGO_ASIGNADOValue;
    property CODIGO_ASIGNADOIsNull: Boolean read GetCODIGO_ASIGNADOIsNull write SetCODIGO_ASIGNADOIsNull;
    property GRUPO_PROVEEDOR: String read GetGRUPO_PROVEEDORValue write SetGRUPO_PROVEEDORValue;
    property GRUPO_PROVEEDORIsNull: Boolean read GetGRUPO_PROVEEDORIsNull write SetGRUPO_PROVEEDORIsNull;
    property REGIMEN_IVA: String read GetREGIMEN_IVAValue write SetREGIMEN_IVAValue;
    property REGIMEN_IVAIsNull: Boolean read GetREGIMEN_IVAIsNull write SetREGIMEN_IVAIsNull;
    property ID_TIPO_IVA: Integer read GetID_TIPO_IVAValue write SetID_TIPO_IVAValue;
    property ID_TIPO_IVAIsNull: Boolean read GetID_TIPO_IVAIsNull write SetID_TIPO_IVAIsNull;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
    property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
    property TIENDA_WEB: SmallInt read GetTIENDA_WEBValue write SetTIENDA_WEBValue;
    property TIENDA_WEBIsNull: Boolean read GetTIENDA_WEBIsNull write SetTIENDA_WEBIsNull;
    property HOMOLOGADO: SmallInt read GetHOMOLOGADOValue write SetHOMOLOGADOValue;
    property HOMOLOGADOIsNull: Boolean read GetHOMOLOGADOIsNull write SetHOMOLOGADOIsNull;
    property CERTIFICACION: String read GetCERTIFICACIONValue write SetCERTIFICACIONValue;
    property CERTIFICACIONIsNull: Boolean read GetCERTIFICACIONIsNull write SetCERTIFICACIONIsNull;
    property IGNORAR_CONTABILIDAD: Integer read GetIGNORAR_CONTABILIDADValue write SetIGNORAR_CONTABILIDADValue;
    property IGNORAR_CONTABILIDADIsNull: Boolean read GetIGNORAR_CONTABILIDADIsNull write SetIGNORAR_CONTABILIDADIsNull;
    property TIENE_SUBCUENTA: Integer read GetTIENE_SUBCUENTAValue write SetTIENE_SUBCUENTAValue;
    property TIENE_SUBCUENTAIsNull: Boolean read GetTIENE_SUBCUENTAIsNull write SetTIENE_SUBCUENTAIsNull;
    property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
    property NOMBRE_COMERCIALIsNull: Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull;
    property ES_ACREEDOR: SmallInt read GetES_ACREEDORValue write SetES_ACREEDORValue;
    property ES_ACREEDORIsNull: Boolean read GetES_ACREEDORIsNull write SetES_ACREEDORIsNull;
    property VENCIMIENTO_FACTURAS_1: Integer read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
    property VENCIMIENTO_FACTURAS_1IsNull: Boolean read GetVENCIMIENTO_FACTURAS_1IsNull write SetVENCIMIENTO_FACTURAS_1IsNull;
    property VENCIMIENTO_FACTURAS_2: Integer read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
    property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
    property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
    property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
  end;

  { TProveedoresDataTableRules }
  TProveedoresDataTableRules = class(TIntfObjectDADataTableRules, IProveedores)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetDESCUENTOIsNull: Boolean; virtual;
    procedure SetDESCUENTOIsNull(const aValue: Boolean); virtual;
    function GetDESCRIPCION_PROVEEDORValue: String; virtual;
    procedure SetDESCRIPCION_PROVEEDORValue(const aValue: String); virtual;
    function GetDESCRIPCION_PROVEEDORIsNull: Boolean; virtual;
    procedure SetDESCRIPCION_PROVEEDORIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_ASIGNADOValue: String; virtual;
    procedure SetCODIGO_ASIGNADOValue(const aValue: String); virtual;
    function GetCODIGO_ASIGNADOIsNull: Boolean; virtual;
    procedure SetCODIGO_ASIGNADOIsNull(const aValue: Boolean); virtual;
    function GetGRUPO_PROVEEDORValue: String; virtual;
    procedure SetGRUPO_PROVEEDORValue(const aValue: String); virtual;
    function GetGRUPO_PROVEEDORIsNull: Boolean; virtual;
    procedure SetGRUPO_PROVEEDORIsNull(const aValue: Boolean); virtual;
    function GetREGIMEN_IVAValue: String; virtual;
    procedure SetREGIMEN_IVAValue(const aValue: String); virtual;
    function GetREGIMEN_IVAIsNull: Boolean; virtual;
    procedure SetREGIMEN_IVAIsNull(const aValue: Boolean); virtual;
    function GetID_TIPO_IVAValue: Integer; virtual;
    procedure SetID_TIPO_IVAValue(const aValue: Integer); virtual;
    function GetID_TIPO_IVAIsNull: Boolean; virtual;
    procedure SetID_TIPO_IVAIsNull(const aValue: Boolean); virtual;
    function GetID_FORMA_PAGOValue: Integer; virtual;
    procedure SetID_FORMA_PAGOValue(const aValue: Integer); virtual;
    function GetID_FORMA_PAGOIsNull: Boolean; virtual;
    procedure SetID_FORMA_PAGOIsNull(const aValue: Boolean); virtual;
    function GetTIENDA_WEBValue: SmallInt; virtual;
    procedure SetTIENDA_WEBValue(const aValue: SmallInt); virtual;
    function GetTIENDA_WEBIsNull: Boolean; virtual;
    procedure SetTIENDA_WEBIsNull(const aValue: Boolean); virtual;
    function GetHOMOLOGADOValue: SmallInt; virtual;
    procedure SetHOMOLOGADOValue(const aValue: SmallInt); virtual;
    function GetHOMOLOGADOIsNull: Boolean; virtual;
    procedure SetHOMOLOGADOIsNull(const aValue: Boolean); virtual;
    function GetCERTIFICACIONValue: String; virtual;
    procedure SetCERTIFICACIONValue(const aValue: String); virtual;
    function GetCERTIFICACIONIsNull: Boolean; virtual;
    procedure SetCERTIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetIGNORAR_CONTABILIDADValue: Integer; virtual;
    procedure SetIGNORAR_CONTABILIDADValue(const aValue: Integer); virtual;
    function GetIGNORAR_CONTABILIDADIsNull: Boolean; virtual;
    procedure SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean); virtual;
    function GetTIENE_SUBCUENTAValue: Integer; virtual;
    procedure SetTIENE_SUBCUENTAValue(const aValue: Integer); virtual;
    function GetTIENE_SUBCUENTAIsNull: Boolean; virtual;
    procedure SetTIENE_SUBCUENTAIsNull(const aValue: Boolean); virtual;
    function GetNOMBRE_COMERCIALValue: String; virtual;
    procedure SetNOMBRE_COMERCIALValue(const aValue: String); virtual;
    function GetNOMBRE_COMERCIALIsNull: Boolean; virtual;
    procedure SetNOMBRE_COMERCIALIsNull(const aValue: Boolean); virtual;
    function GetES_ACREEDORValue: SmallInt; virtual;
    procedure SetES_ACREEDORValue(const aValue: SmallInt); virtual;
    function GetES_ACREEDORIsNull: Boolean; virtual;
    procedure SetES_ACREEDORIsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_1Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_1IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_2Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_2IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean); virtual;
    function GetVENCIMIENTO_FACTURAS_3Value: Integer; virtual;
    procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer); virtual;
    function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean; virtual;
    procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
    property DESCRIPCION_PROVEEDOR: String read GetDESCRIPCION_PROVEEDORValue write SetDESCRIPCION_PROVEEDORValue;
    property DESCRIPCION_PROVEEDORIsNull: Boolean read GetDESCRIPCION_PROVEEDORIsNull write SetDESCRIPCION_PROVEEDORIsNull;
    property CODIGO_ASIGNADO: String read GetCODIGO_ASIGNADOValue write SetCODIGO_ASIGNADOValue;
    property CODIGO_ASIGNADOIsNull: Boolean read GetCODIGO_ASIGNADOIsNull write SetCODIGO_ASIGNADOIsNull;
    property GRUPO_PROVEEDOR: String read GetGRUPO_PROVEEDORValue write SetGRUPO_PROVEEDORValue;
    property GRUPO_PROVEEDORIsNull: Boolean read GetGRUPO_PROVEEDORIsNull write SetGRUPO_PROVEEDORIsNull;
    property REGIMEN_IVA: String read GetREGIMEN_IVAValue write SetREGIMEN_IVAValue;
    property REGIMEN_IVAIsNull: Boolean read GetREGIMEN_IVAIsNull write SetREGIMEN_IVAIsNull;
    property ID_TIPO_IVA: Integer read GetID_TIPO_IVAValue write SetID_TIPO_IVAValue;
    property ID_TIPO_IVAIsNull: Boolean read GetID_TIPO_IVAIsNull write SetID_TIPO_IVAIsNull;
    property ID_FORMA_PAGO: Integer read GetID_FORMA_PAGOValue write SetID_FORMA_PAGOValue;
    property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
    property TIENDA_WEB: SmallInt read GetTIENDA_WEBValue write SetTIENDA_WEBValue;
    property TIENDA_WEBIsNull: Boolean read GetTIENDA_WEBIsNull write SetTIENDA_WEBIsNull;
    property HOMOLOGADO: SmallInt read GetHOMOLOGADOValue write SetHOMOLOGADOValue;
    property HOMOLOGADOIsNull: Boolean read GetHOMOLOGADOIsNull write SetHOMOLOGADOIsNull;
    property CERTIFICACION: String read GetCERTIFICACIONValue write SetCERTIFICACIONValue;
    property CERTIFICACIONIsNull: Boolean read GetCERTIFICACIONIsNull write SetCERTIFICACIONIsNull;
    property IGNORAR_CONTABILIDAD: Integer read GetIGNORAR_CONTABILIDADValue write SetIGNORAR_CONTABILIDADValue;
    property IGNORAR_CONTABILIDADIsNull: Boolean read GetIGNORAR_CONTABILIDADIsNull write SetIGNORAR_CONTABILIDADIsNull;
    property TIENE_SUBCUENTA: Integer read GetTIENE_SUBCUENTAValue write SetTIENE_SUBCUENTAValue;
    property TIENE_SUBCUENTAIsNull: Boolean read GetTIENE_SUBCUENTAIsNull write SetTIENE_SUBCUENTAIsNull;
    property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
    property NOMBRE_COMERCIALIsNull: Boolean read GetNOMBRE_COMERCIALIsNull write SetNOMBRE_COMERCIALIsNull;
    property ES_ACREEDOR: SmallInt read GetES_ACREEDORValue write SetES_ACREEDORValue;
    property ES_ACREEDORIsNull: Boolean read GetES_ACREEDORIsNull write SetES_ACREEDORIsNull;
    property VENCIMIENTO_FACTURAS_1: Integer read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
    property VENCIMIENTO_FACTURAS_1IsNull: Boolean read GetVENCIMIENTO_FACTURAS_1IsNull write SetVENCIMIENTO_FACTURAS_1IsNull;
    property VENCIMIENTO_FACTURAS_2: Integer read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
    property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
    property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
    property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;

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

  end;

  { IComerciales }
  IComerciales = interface(IDAStronglyTypedDataTable)
  ['{C349BA14-A608-41C2-9FD6-7A226C24F935}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);
    function GetCOMISIONValue: Float;
    procedure SetCOMISIONValue(const aValue: Float);
    function GetCOMISIONIsNull: Boolean;
    procedure SetCOMISIONIsNull(const aValue: Boolean);
    function GetDELEGACIONValue: String;
    procedure SetDELEGACIONValue(const aValue: String);
    function GetDELEGACIONIsNull: Boolean;
    procedure SetDELEGACIONIsNull(const aValue: Boolean);
    function GetFECHA_ALTA_EMPRESAValue: DateTime;
    procedure SetFECHA_ALTA_EMPRESAValue(const aValue: DateTime);
    function GetFECHA_ALTA_EMPRESAIsNull: Boolean;
    procedure SetFECHA_ALTA_EMPRESAIsNull(const aValue: Boolean);
    function GetFECHA_BAJAValue: DateTime;
    procedure SetFECHA_BAJAValue(const aValue: DateTime);
    function GetFECHA_BAJAIsNull: Boolean;
    procedure SetFECHA_BAJAIsNull(const aValue: Boolean);
    function GetCAUSA_BAJAValue: String;
    procedure SetCAUSA_BAJAValue(const aValue: String);
    function GetCAUSA_BAJAIsNull: Boolean;
    procedure SetCAUSA_BAJAIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property COMISION: Float read GetCOMISIONValue write SetCOMISIONValue;
    property COMISIONIsNull: Boolean read GetCOMISIONIsNull write SetCOMISIONIsNull;
    property DELEGACION: String read GetDELEGACIONValue write SetDELEGACIONValue;
    property DELEGACIONIsNull: Boolean read GetDELEGACIONIsNull write SetDELEGACIONIsNull;
    property FECHA_ALTA_EMPRESA: DateTime read GetFECHA_ALTA_EMPRESAValue write SetFECHA_ALTA_EMPRESAValue;
    property FECHA_ALTA_EMPRESAIsNull: Boolean read GetFECHA_ALTA_EMPRESAIsNull write SetFECHA_ALTA_EMPRESAIsNull;
    property FECHA_BAJA: DateTime read GetFECHA_BAJAValue write SetFECHA_BAJAValue;
    property FECHA_BAJAIsNull: Boolean read GetFECHA_BAJAIsNull write SetFECHA_BAJAIsNull;
    property CAUSA_BAJA: String read GetCAUSA_BAJAValue write SetCAUSA_BAJAValue;
    property CAUSA_BAJAIsNull: Boolean read GetCAUSA_BAJAIsNull write SetCAUSA_BAJAIsNull;
  end;

  { TComercialesDataTableRules }
  TComercialesDataTableRules = class(TIntfObjectDADataTableRules, IComerciales)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;
    function GetCOMISIONValue: Float; virtual;
    procedure SetCOMISIONValue(const aValue: Float); virtual;
    function GetCOMISIONIsNull: Boolean; virtual;
    procedure SetCOMISIONIsNull(const aValue: Boolean); virtual;
    function GetDELEGACIONValue: String; virtual;
    procedure SetDELEGACIONValue(const aValue: String); virtual;
    function GetDELEGACIONIsNull: Boolean; virtual;
    procedure SetDELEGACIONIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTA_EMPRESAValue: DateTime; virtual;
    procedure SetFECHA_ALTA_EMPRESAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTA_EMPRESAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTA_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_BAJAValue: DateTime; virtual;
    procedure SetFECHA_BAJAValue(const aValue: DateTime); virtual;
    function GetFECHA_BAJAIsNull: Boolean; virtual;
    procedure SetFECHA_BAJAIsNull(const aValue: Boolean); virtual;
    function GetCAUSA_BAJAValue: String; virtual;
    procedure SetCAUSA_BAJAValue(const aValue: String); virtual;
    function GetCAUSA_BAJAIsNull: Boolean; virtual;
    procedure SetCAUSA_BAJAIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property COMISION: Float read GetCOMISIONValue write SetCOMISIONValue;
    property COMISIONIsNull: Boolean read GetCOMISIONIsNull write SetCOMISIONIsNull;
    property DELEGACION: String read GetDELEGACIONValue write SetDELEGACIONValue;
    property DELEGACIONIsNull: Boolean read GetDELEGACIONIsNull write SetDELEGACIONIsNull;
    property FECHA_ALTA_EMPRESA: DateTime read GetFECHA_ALTA_EMPRESAValue write SetFECHA_ALTA_EMPRESAValue;
    property FECHA_ALTA_EMPRESAIsNull: Boolean read GetFECHA_ALTA_EMPRESAIsNull write SetFECHA_ALTA_EMPRESAIsNull;
    property FECHA_BAJA: DateTime read GetFECHA_BAJAValue write SetFECHA_BAJAValue;
    property FECHA_BAJAIsNull: Boolean read GetFECHA_BAJAIsNull write SetFECHA_BAJAIsNull;
    property CAUSA_BAJA: String read GetCAUSA_BAJAValue write SetCAUSA_BAJAValue;
    property CAUSA_BAJAIsNull: Boolean read GetCAUSA_BAJAIsNull write SetCAUSA_BAJAIsNull;

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

  end;

  { IInstaladores }
  IInstaladores = interface(IDAStronglyTypedDataTable)
  ['{81BCD723-6AC8-4A24-89C3-0CCEF9FB01CA}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
  end;

  { TInstaladoresDataTableRules }
  TInstaladoresDataTableRules = class(TIntfObjectDADataTableRules, IInstaladores)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;

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

  end;

  { IVendedores }
  IVendedores = interface(IDAStronglyTypedDataTable)
  ['{A447A57D-31CF-4958-87CA-B95067039FEA}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CATEGORIAValue: Integer;
    procedure SetID_CATEGORIAValue(const aValue: Integer);
    function GetID_CATEGORIAIsNull: Boolean;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetIDIOMA_ISOValue: String;
    procedure SetIDIOMA_ISOValue(const aValue: String);
    function GetIDIOMA_ISOIsNull: Boolean;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean);
    function GetIDIOMAValue: String;
    procedure SetIDIOMAValue(const aValue: String);
    function GetIDIOMAIsNull: Boolean;
    procedure SetIDIOMAIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetID_EMPRESAIsNull: Boolean;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetID_TIENDAValue: Integer;
    procedure SetID_TIENDAValue(const aValue: Integer);
    function GetID_TIENDAIsNull: Boolean;
    procedure SetID_TIENDAIsNull(const aValue: Boolean);
    function GetTIENDAValue: String;
    procedure SetTIENDAValue(const aValue: String);
    function GetTIENDAIsNull: Boolean;
    procedure SetTIENDAIsNull(const aValue: Boolean);
    function GetCOMISIONValue: Float;
    procedure SetCOMISIONValue(const aValue: Float);
    function GetCOMISIONIsNull: Boolean;
    procedure SetCOMISIONIsNull(const aValue: Boolean);
    function GetID_USUARIOValue: Integer;
    procedure SetID_USUARIOValue(const aValue: Integer);
    function GetID_USUARIOIsNull: Boolean;
    procedure SetID_USUARIOIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property COMISION: Float read GetCOMISIONValue write SetCOMISIONValue;
    property COMISIONIsNull: Boolean read GetCOMISIONIsNull write SetCOMISIONIsNull;
    property ID_USUARIO: Integer read GetID_USUARIOValue write SetID_USUARIOValue;
    property ID_USUARIOIsNull: Boolean read GetID_USUARIOIsNull write SetID_USUARIOIsNull;
  end;

  { TVendedoresDataTableRules }
  TVendedoresDataTableRules = class(TIntfObjectDADataTableRules, IVendedores)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CATEGORIAValue: Integer; virtual;
    procedure SetID_CATEGORIAValue(const aValue: Integer); virtual;
    function GetID_CATEGORIAIsNull: Boolean; virtual;
    procedure SetID_CATEGORIAIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetIDIOMA_ISOValue: String; virtual;
    procedure SetIDIOMA_ISOValue(const aValue: String); virtual;
    function GetIDIOMA_ISOIsNull: Boolean; virtual;
    procedure SetIDIOMA_ISOIsNull(const aValue: Boolean); virtual;
    function GetIDIOMAValue: String; virtual;
    procedure SetIDIOMAValue(const aValue: String); virtual;
    function GetIDIOMAIsNull: Boolean; virtual;
    procedure SetIDIOMAIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetID_EMPRESAIsNull: Boolean; virtual;
    procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetID_TIENDAValue: Integer; virtual;
    procedure SetID_TIENDAValue(const aValue: Integer); virtual;
    function GetID_TIENDAIsNull: Boolean; virtual;
    procedure SetID_TIENDAIsNull(const aValue: Boolean); virtual;
    function GetTIENDAValue: String; virtual;
    procedure SetTIENDAValue(const aValue: String); virtual;
    function GetTIENDAIsNull: Boolean; virtual;
    procedure SetTIENDAIsNull(const aValue: Boolean); virtual;
    function GetCOMISIONValue: Float; virtual;
    procedure SetCOMISIONValue(const aValue: Float); virtual;
    function GetCOMISIONIsNull: Boolean; virtual;
    procedure SetCOMISIONIsNull(const aValue: Boolean); virtual;
    function GetID_USUARIOValue: Integer; virtual;
    procedure SetID_USUARIOValue(const aValue: Integer); virtual;
    function GetID_USUARIOIsNull: Boolean; virtual;
    procedure SetID_USUARIOIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CATEGORIA: Integer read GetID_CATEGORIAValue write SetID_CATEGORIAValue;
    property ID_CATEGORIAIsNull: Boolean read GetID_CATEGORIAIsNull write SetID_CATEGORIAIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property IDIOMA_ISO: String read GetIDIOMA_ISOValue write SetIDIOMA_ISOValue;
    property IDIOMA_ISOIsNull: Boolean read GetIDIOMA_ISOIsNull write SetIDIOMA_ISOIsNull;
    property IDIOMA: String read GetIDIOMAValue write SetIDIOMAValue;
    property IDIOMAIsNull: Boolean read GetIDIOMAIsNull write SetIDIOMAIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property ID_TIENDA: Integer read GetID_TIENDAValue write SetID_TIENDAValue;
    property ID_TIENDAIsNull: Boolean read GetID_TIENDAIsNull write SetID_TIENDAIsNull;
    property TIENDA: String read GetTIENDAValue write SetTIENDAValue;
    property TIENDAIsNull: Boolean read GetTIENDAIsNull write SetTIENDAIsNull;
    property COMISION: Float read GetCOMISIONValue write SetCOMISIONValue;
    property COMISIONIsNull: Boolean read GetCOMISIONIsNull write SetCOMISIONIsNull;
    property ID_USUARIO: Integer read GetID_USUARIOValue write SetID_USUARIOValue;
    property ID_USUARIOIsNull: Boolean read GetID_USUARIOIsNull write SetID_USUARIOIsNull;

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

  end;

  { IDireccionesContacto }
  IDireccionesContacto = interface(IDAStronglyTypedDataTable)
  ['{E55C842A-BECC-460E-8FD4-B836C739AEB7}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CONTACTOValue: Integer;
    procedure SetID_CONTACTOValue(const aValue: Integer);
    function GetID_CONTACTOIsNull: Boolean;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetTELEFONOValue: String;
    procedure SetTELEFONOValue(const aValue: String);
    function GetTELEFONOIsNull: Boolean;
    procedure SetTELEFONOIsNull(const aValue: Boolean);
    function GetMOVILValue: String;
    procedure SetMOVILValue(const aValue: String);
    function GetMOVILIsNull: Boolean;
    procedure SetMOVILIsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAILValue: String;
    procedure SetEMAILValue(const aValue: String);
    function GetEMAILIsNull: Boolean;
    procedure SetEMAILIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetPORTEValue: Float;
    procedure SetPORTEValue(const aValue: Float);
    function GetPORTEIsNull: Boolean;
    procedure SetPORTEIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property PORTE: Float read GetPORTEValue write SetPORTEValue;
    property PORTEIsNull: Boolean read GetPORTEIsNull write SetPORTEIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
  end;

  { TDireccionesContactoDataTableRules }
  TDireccionesContactoDataTableRules = class(TIntfObjectDADataTableRules, IDireccionesContacto)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CONTACTOValue: Integer; virtual;
    procedure SetID_CONTACTOValue(const aValue: Integer); virtual;
    function GetID_CONTACTOIsNull: Boolean; virtual;
    procedure SetID_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetTELEFONOValue: String; virtual;
    procedure SetTELEFONOValue(const aValue: String); virtual;
    function GetTELEFONOIsNull: Boolean; virtual;
    procedure SetTELEFONOIsNull(const aValue: Boolean); virtual;
    function GetMOVILValue: String; virtual;
    procedure SetMOVILValue(const aValue: String); virtual;
    function GetMOVILIsNull: Boolean; virtual;
    procedure SetMOVILIsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAILValue: String; virtual;
    procedure SetEMAILValue(const aValue: String); virtual;
    function GetEMAILIsNull: Boolean; virtual;
    procedure SetEMAILIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetPORTEValue: Float; virtual;
    procedure SetPORTEValue(const aValue: Float); virtual;
    function GetPORTEIsNull: Boolean; virtual;
    procedure SetPORTEIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CONTACTO: Integer read GetID_CONTACTOValue write SetID_CONTACTOValue;
    property ID_CONTACTOIsNull: Boolean read GetID_CONTACTOIsNull write SetID_CONTACTOIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property TELEFONO: String read GetTELEFONOValue write SetTELEFONOValue;
    property TELEFONOIsNull: Boolean read GetTELEFONOIsNull write SetTELEFONOIsNull;
    property MOVIL: String read GetMOVILValue write SetMOVILValue;
    property MOVILIsNull: Boolean read GetMOVILIsNull write SetMOVILIsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL: String read GetEMAILValue write SetEMAILValue;
    property EMAILIsNull: Boolean read GetEMAILIsNull write SetEMAILIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property PORTE: Float read GetPORTEValue write SetPORTEValue;
    property PORTEIsNull: Boolean read GetPORTEIsNull write SetPORTEIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;

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

  end;

  { IClientesDescuentos }
  IClientesDescuentos = interface(IDAStronglyTypedDataTable)
  ['{ECE3BBFC-67C3-45B9-ABB3-D28790739CD1}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetID_CLIENTEValue: Integer;
    procedure SetID_CLIENTEValue(const aValue: Integer);
    function GetID_CLIENTEIsNull: Boolean;
    procedure SetID_CLIENTEIsNull(const aValue: Boolean);
    function GetID_PROVEEDORValue: Integer;
    procedure SetID_PROVEEDORValue(const aValue: Integer);
    function GetID_PROVEEDORIsNull: Boolean;
    procedure SetID_PROVEEDORIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetDESCUENTOValue: Float;
    procedure SetDESCUENTOValue(const aValue: Float);
    function GetDESCUENTOIsNull: Boolean;
    procedure SetDESCUENTOIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
    property ID_CLIENTEIsNull: Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
  end;

  { TClientesDescuentosDataTableRules }
  TClientesDescuentosDataTableRules = class(TIntfObjectDADataTableRules, IClientesDescuentos)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetID_CLIENTEValue: Integer; virtual;
    procedure SetID_CLIENTEValue(const aValue: Integer); virtual;
    function GetID_CLIENTEIsNull: Boolean; virtual;
    procedure SetID_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetID_PROVEEDORIsNull: Boolean; virtual;
    procedure SetID_PROVEEDORIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetDESCUENTOValue: Float; virtual;
    procedure SetDESCUENTOValue(const aValue: Float); virtual;
    function GetDESCUENTOIsNull: Boolean; virtual;
    procedure SetDESCUENTOIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property ID_CLIENTE: Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
    property ID_CLIENTEIsNull: Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
    property ID_PROVEEDOR: Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property ID_PROVEEDORIsNull: Boolean read GetID_PROVEEDORIsNull write SetID_PROVEEDORIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property DESCUENTO: Float read GetDESCUENTOValue write SetDESCUENTOValue;
    property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;

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

  end;

  { IProcedenciasCliente }
  IProcedenciasCliente = interface(IDAStronglyTypedDataTable)
  ['{9829BB9A-F968-454A-A415-20A2CAE3AAED}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetDESCRIPCIONIsNull: Boolean;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
  end;

  { TProcedenciasClienteDataTableRules }
  TProcedenciasClienteDataTableRules = class(TIntfObjectDADataTableRules, IProcedenciasCliente)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetDESCRIPCIONIsNull: Boolean; virtual;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;

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

  end;

  { IGruposProveedor }
  IGruposProveedor = interface(IDAStronglyTypedDataTable)
  ['{64F28702-F5B8-462D-8A92-6AC3B0E91391}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetDESCRIPCIONIsNull: Boolean;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
  end;

  { TGruposProveedorDataTableRules }
  TGruposProveedorDataTableRules = class(TIntfObjectDADataTableRules, IGruposProveedor)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetDESCRIPCIONIsNull: Boolean; virtual;
    procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;

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

  end;

  { IContactos_Refresh }
  IContactos_Refresh = interface(IDAStronglyTypedDataTable)
  ['{1C74F97C-DCEB-49CA-8781-D9909425C395}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetIDIsNull: Boolean;
    procedure SetIDIsNull(const aValue: Boolean);
    function GetNIF_CIFValue: String;
    procedure SetNIF_CIFValue(const aValue: String);
    function GetNIF_CIFIsNull: Boolean;
    procedure SetNIF_CIFIsNull(const aValue: Boolean);
    function GetNOMBREValue: String;
    procedure SetNOMBREValue(const aValue: String);
    function GetNOMBREIsNull: Boolean;
    procedure SetNOMBREIsNull(const aValue: Boolean);
    function GetCALLEValue: String;
    procedure SetCALLEValue(const aValue: String);
    function GetCALLEIsNull: Boolean;
    procedure SetCALLEIsNull(const aValue: Boolean);
    function GetPOBLACIONValue: String;
    procedure SetPOBLACIONValue(const aValue: String);
    function GetPOBLACIONIsNull: Boolean;
    procedure SetPOBLACIONIsNull(const aValue: Boolean);
    function GetPROVINCIAValue: String;
    procedure SetPROVINCIAValue(const aValue: String);
    function GetPROVINCIAIsNull: Boolean;
    procedure SetPROVINCIAIsNull(const aValue: Boolean);
    function GetCODIGO_POSTALValue: String;
    procedure SetCODIGO_POSTALValue(const aValue: String);
    function GetCODIGO_POSTALIsNull: Boolean;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean);
    function GetPAISValue: String;
    procedure SetPAISValue(const aValue: String);
    function GetPAISIsNull: Boolean;
    procedure SetPAISIsNull(const aValue: Boolean);
    function GetTELEFONO_1Value: String;
    procedure SetTELEFONO_1Value(const aValue: String);
    function GetTELEFONO_1IsNull: Boolean;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean);
    function GetTELEFONO_2Value: String;
    procedure SetTELEFONO_2Value(const aValue: String);
    function GetTELEFONO_2IsNull: Boolean;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean);
    function GetMOVIL_1Value: String;
    procedure SetMOVIL_1Value(const aValue: String);
    function GetMOVIL_1IsNull: Boolean;
    procedure SetMOVIL_1IsNull(const aValue: Boolean);
    function GetMOVIL_2Value: String;
    procedure SetMOVIL_2Value(const aValue: String);
    function GetMOVIL_2IsNull: Boolean;
    procedure SetMOVIL_2IsNull(const aValue: Boolean);
    function GetFAXValue: String;
    procedure SetFAXValue(const aValue: String);
    function GetFAXIsNull: Boolean;
    procedure SetFAXIsNull(const aValue: Boolean);
    function GetEMAIL_1Value: String;
    procedure SetEMAIL_1Value(const aValue: String);
    function GetEMAIL_1IsNull: Boolean;
    procedure SetEMAIL_1IsNull(const aValue: Boolean);
    function GetEMAIL_2Value: String;
    procedure SetEMAIL_2Value(const aValue: String);
    function GetEMAIL_2IsNull: Boolean;
    procedure SetEMAIL_2IsNull(const aValue: Boolean);
    function GetPAGINA_WEBValue: String;
    procedure SetPAGINA_WEBValue(const aValue: String);
    function GetPAGINA_WEBIsNull: Boolean;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean);
    function GetNOTASValue: IROStrings;
    function GetNOTASIsNull: Boolean;
    procedure SetNOTASIsNull(const aValue: Boolean);
    function GetFECHA_ALTAValue: DateTime;
    procedure SetFECHA_ALTAValue(const aValue: DateTime);
    function GetFECHA_ALTAIsNull: Boolean;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean);
    function GetFECHA_MODIFICACIONValue: DateTime;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime);
    function GetFECHA_MODIFICACIONIsNull: Boolean;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
    function GetUSUARIOValue: String;
    procedure SetUSUARIOValue(const aValue: String);
    function GetUSUARIOIsNull: Boolean;
    procedure SetUSUARIOIsNull(const aValue: Boolean);
    function GetREFERENCIAValue: String;
    procedure SetREFERENCIAValue(const aValue: String);
    function GetREFERENCIAIsNull: Boolean;
    procedure SetREFERENCIAIsNull(const aValue: Boolean);
    function GetPERSONA_CONTACTOValue: String;
    procedure SetPERSONA_CONTACTOValue(const aValue: String);
    function GetPERSONA_CONTACTOIsNull: Boolean;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;
  end;

  { TContactos_RefreshDataTableRules }
  TContactos_RefreshDataTableRules = class(TIntfObjectDADataTableRules, IContactos_Refresh)
  private
    f_NOTAS: IROStrings;
    procedure NOTAS_OnChange(Sender: TObject);
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetIDIsNull: Boolean; virtual;
    procedure SetIDIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIFValue: String; virtual;
    procedure SetNIF_CIFValue(const aValue: String); virtual;
    function GetNIF_CIFIsNull: Boolean; virtual;
    procedure SetNIF_CIFIsNull(const aValue: Boolean); virtual;
    function GetNOMBREValue: String; virtual;
    procedure SetNOMBREValue(const aValue: String); virtual;
    function GetNOMBREIsNull: Boolean; virtual;
    procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
    function GetCALLEValue: String; virtual;
    procedure SetCALLEValue(const aValue: String); virtual;
    function GetCALLEIsNull: Boolean; virtual;
    procedure SetCALLEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACIONValue: String; virtual;
    procedure SetPOBLACIONValue(const aValue: String); virtual;
    function GetPOBLACIONIsNull: Boolean; virtual;
    procedure SetPOBLACIONIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIAValue: String; virtual;
    procedure SetPROVINCIAValue(const aValue: String); virtual;
    function GetPROVINCIAIsNull: Boolean; virtual;
    procedure SetPROVINCIAIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTALValue: String; virtual;
    procedure SetCODIGO_POSTALValue(const aValue: String); virtual;
    function GetCODIGO_POSTALIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTALIsNull(const aValue: Boolean); virtual;
    function GetPAISValue: String; virtual;
    procedure SetPAISValue(const aValue: String); virtual;
    function GetPAISIsNull: Boolean; virtual;
    procedure SetPAISIsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_1Value: String; virtual;
    procedure SetTELEFONO_1Value(const aValue: String); virtual;
    function GetTELEFONO_1IsNull: Boolean; virtual;
    procedure SetTELEFONO_1IsNull(const aValue: Boolean); virtual;
    function GetTELEFONO_2Value: String; virtual;
    procedure SetTELEFONO_2Value(const aValue: String); virtual;
    function GetTELEFONO_2IsNull: Boolean; virtual;
    procedure SetTELEFONO_2IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_1Value: String; virtual;
    procedure SetMOVIL_1Value(const aValue: String); virtual;
    function GetMOVIL_1IsNull: Boolean; virtual;
    procedure SetMOVIL_1IsNull(const aValue: Boolean); virtual;
    function GetMOVIL_2Value: String; virtual;
    procedure SetMOVIL_2Value(const aValue: String); virtual;
    function GetMOVIL_2IsNull: Boolean; virtual;
    procedure SetMOVIL_2IsNull(const aValue: Boolean); virtual;
    function GetFAXValue: String; virtual;
    procedure SetFAXValue(const aValue: String); virtual;
    function GetFAXIsNull: Boolean; virtual;
    procedure SetFAXIsNull(const aValue: Boolean); virtual;
    function GetEMAIL_1Value: String; virtual;
    procedure SetEMAIL_1Value(const aValue: String); virtual;
    function GetEMAIL_1IsNull: Boolean; virtual;
    procedure SetEMAIL_1IsNull(const aValue: Boolean); virtual;
    function GetEMAIL_2Value: String; virtual;
    procedure SetEMAIL_2Value(const aValue: String); virtual;
    function GetEMAIL_2IsNull: Boolean; virtual;
    procedure SetEMAIL_2IsNull(const aValue: Boolean); virtual;
    function GetPAGINA_WEBValue: String; virtual;
    procedure SetPAGINA_WEBValue(const aValue: String); virtual;
    function GetPAGINA_WEBIsNull: Boolean; virtual;
    procedure SetPAGINA_WEBIsNull(const aValue: Boolean); virtual;
    function GetNOTASValue: IROStrings; virtual;
    function GetNOTASIsNull: Boolean; virtual;
    procedure SetNOTASIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIAIsNull: Boolean; virtual;
    procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
    function GetPERSONA_CONTACTOValue: String; virtual;
    procedure SetPERSONA_CONTACTOValue(const aValue: String); virtual;
    function GetPERSONA_CONTACTOIsNull: Boolean; virtual;
    procedure SetPERSONA_CONTACTOIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
    property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
    property NIF_CIFIsNull: Boolean read GetNIF_CIFIsNull write SetNIF_CIFIsNull;
    property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
    property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
    property CALLE: String read GetCALLEValue write SetCALLEValue;
    property CALLEIsNull: Boolean read GetCALLEIsNull write SetCALLEIsNull;
    property POBLACION: String read GetPOBLACIONValue write SetPOBLACIONValue;
    property POBLACIONIsNull: Boolean read GetPOBLACIONIsNull write SetPOBLACIONIsNull;
    property PROVINCIA: String read GetPROVINCIAValue write SetPROVINCIAValue;
    property PROVINCIAIsNull: Boolean read GetPROVINCIAIsNull write SetPROVINCIAIsNull;
    property CODIGO_POSTAL: String read GetCODIGO_POSTALValue write SetCODIGO_POSTALValue;
    property CODIGO_POSTALIsNull: Boolean read GetCODIGO_POSTALIsNull write SetCODIGO_POSTALIsNull;
    property PAIS: String read GetPAISValue write SetPAISValue;
    property PAISIsNull: Boolean read GetPAISIsNull write SetPAISIsNull;
    property TELEFONO_1: String read GetTELEFONO_1Value write SetTELEFONO_1Value;
    property TELEFONO_1IsNull: Boolean read GetTELEFONO_1IsNull write SetTELEFONO_1IsNull;
    property TELEFONO_2: String read GetTELEFONO_2Value write SetTELEFONO_2Value;
    property TELEFONO_2IsNull: Boolean read GetTELEFONO_2IsNull write SetTELEFONO_2IsNull;
    property MOVIL_1: String read GetMOVIL_1Value write SetMOVIL_1Value;
    property MOVIL_1IsNull: Boolean read GetMOVIL_1IsNull write SetMOVIL_1IsNull;
    property MOVIL_2: String read GetMOVIL_2Value write SetMOVIL_2Value;
    property MOVIL_2IsNull: Boolean read GetMOVIL_2IsNull write SetMOVIL_2IsNull;
    property FAX: String read GetFAXValue write SetFAXValue;
    property FAXIsNull: Boolean read GetFAXIsNull write SetFAXIsNull;
    property EMAIL_1: String read GetEMAIL_1Value write SetEMAIL_1Value;
    property EMAIL_1IsNull: Boolean read GetEMAIL_1IsNull write SetEMAIL_1IsNull;
    property EMAIL_2: String read GetEMAIL_2Value write SetEMAIL_2Value;
    property EMAIL_2IsNull: Boolean read GetEMAIL_2IsNull write SetEMAIL_2IsNull;
    property PAGINA_WEB: String read GetPAGINA_WEBValue write SetPAGINA_WEBValue;
    property PAGINA_WEBIsNull: Boolean read GetPAGINA_WEBIsNull write SetPAGINA_WEBIsNull;
    property NOTAS: IROStrings read GetNOTASValue;
    property NOTASIsNull: Boolean read GetNOTASIsNull write SetNOTASIsNull;
    property FECHA_ALTA: DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull: Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property FECHA_MODIFICACION: DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull: Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property USUARIO: String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull: Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property PERSONA_CONTACTO: String read GetPERSONA_CONTACTOValue write SetPERSONA_CONTACTOValue;
    property PERSONA_CONTACTOIsNull: Boolean read GetPERSONA_CONTACTOIsNull write SetPERSONA_CONTACTOIsNull;

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

  end;

implementation

uses Variants, uROBinaryHelpers;

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

destructor TDarEmpresasContactoDataTableRules.Destroy;
begin
  inherited;
end;

function TDarEmpresasContactoDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].AsInteger;
end;

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

function TDarEmpresasContactoDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].IsNull;
end;

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


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

destructor TPersonalContactoDataTableRules.Destroy;
begin
  inherited;
end;

function TPersonalContactoDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_PersonalContactoID].AsInteger;
end;

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

function TPersonalContactoDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoID].IsNull;
end;

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

function TPersonalContactoDataTableRules.GetID_CONTACTOValue: Integer;
begin
  result := DataTable.Fields[idx_PersonalContactoID_CONTACTO].AsInteger;
end;

procedure TPersonalContactoDataTableRules.SetID_CONTACTOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_PersonalContactoID_CONTACTO].AsInteger := aValue;
end;

function TPersonalContactoDataTableRules.GetID_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoID_CONTACTO].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetID_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoID_CONTACTO].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoNOMBRE].AsString;
end;

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

function TPersonalContactoDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoNOMBRE].IsNull;
end;

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

function TPersonalContactoDataTableRules.GetPUESTOValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoPUESTO].AsString;
end;

procedure TPersonalContactoDataTableRules.SetPUESTOValue(const aValue: String);
begin
  DataTable.Fields[idx_PersonalContactoPUESTO].AsString := aValue;
end;

function TPersonalContactoDataTableRules.GetPUESTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoPUESTO].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetPUESTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoPUESTO].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetTELEFONOValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoTELEFONO].AsString;
end;

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

function TPersonalContactoDataTableRules.GetTELEFONOIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoTELEFONO].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetTELEFONOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoTELEFONO].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetMOVILValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoMOVIL].AsString;
end;

procedure TPersonalContactoDataTableRules.SetMOVILValue(const aValue: String);
begin
  DataTable.Fields[idx_PersonalContactoMOVIL].AsString := aValue;
end;

function TPersonalContactoDataTableRules.GetMOVILIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoMOVIL].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetMOVILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoMOVIL].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoFAX].AsString;
end;

procedure TPersonalContactoDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_PersonalContactoFAX].AsString := aValue;
end;

function TPersonalContactoDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoFAX].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoFAX].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetEMAILValue: String;
begin
  result := DataTable.Fields[idx_PersonalContactoEMAIL].AsString;
end;

procedure TPersonalContactoDataTableRules.SetEMAILValue(const aValue: String);
begin
  DataTable.Fields[idx_PersonalContactoEMAIL].AsString := aValue;
end;

function TPersonalContactoDataTableRules.GetEMAILIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoEMAIL].IsNull;
end;

procedure TPersonalContactoDataTableRules.SetEMAILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_PersonalContactoEMAIL].AsVariant := Null;
end;

function TPersonalContactoDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_PersonalContactoFECHA_ALTA].AsDateTime;
end;

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

function TPersonalContactoDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoFECHA_ALTA].IsNull;
end;

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

function TPersonalContactoDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_PersonalContactoFECHA_MODIFICACION].AsDateTime;
end;

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

function TPersonalContactoDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_PersonalContactoFECHA_MODIFICACION].IsNull;
end;

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


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

destructor TDarTiendaDeUsuarioDataTableRules.Destroy;
begin
  inherited;
end;

function TDarTiendaDeUsuarioDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_DarTiendaDeUsuarioID_TIENDA].AsInteger;
end;

procedure TDarTiendaDeUsuarioDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_DarTiendaDeUsuarioID_TIENDA].AsInteger := aValue;
end;

function TDarTiendaDeUsuarioDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DarTiendaDeUsuarioID_TIENDA].IsNull;
end;

procedure TDarTiendaDeUsuarioDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DarTiendaDeUsuarioID_TIENDA].AsVariant := Null;
end;


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

destructor TSubCuentasContactoDataTableRules.Destroy;
begin
  inherited;
end;

function TSubCuentasContactoDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID].AsInteger;
end;

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

function TSubCuentasContactoDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID].IsNull;
end;

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

function TSubCuentasContactoDataTableRules.GetREF_SUBCUENTAValue: String;
begin
  result := DataTable.Fields[idx_SubCuentasContactoREF_SUBCUENTA].AsString;
end;

procedure TSubCuentasContactoDataTableRules.SetREF_SUBCUENTAValue(const aValue: String);
begin
  DataTable.Fields[idx_SubCuentasContactoREF_SUBCUENTA].AsString := aValue;
end;

function TSubCuentasContactoDataTableRules.GetREF_SUBCUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoREF_SUBCUENTA].IsNull;
end;

procedure TSubCuentasContactoDataTableRules.SetREF_SUBCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_SubCuentasContactoREF_SUBCUENTA].AsVariant := Null;
end;

function TSubCuentasContactoDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_SubCuentasContactoDESCRIPCION].AsString;
end;

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

function TSubCuentasContactoDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoDESCRIPCION].IsNull;
end;

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

function TSubCuentasContactoDataTableRules.GetID_CUENTAValue: Integer;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_CUENTA].AsInteger;
end;

procedure TSubCuentasContactoDataTableRules.SetID_CUENTAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_SubCuentasContactoID_CUENTA].AsInteger := aValue;
end;

function TSubCuentasContactoDataTableRules.GetID_CUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_CUENTA].IsNull;
end;

procedure TSubCuentasContactoDataTableRules.SetID_CUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_SubCuentasContactoID_CUENTA].AsVariant := Null;
end;

function TSubCuentasContactoDataTableRules.GetID_EJERCICIOValue: Integer;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_EJERCICIO].AsInteger;
end;

procedure TSubCuentasContactoDataTableRules.SetID_EJERCICIOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_SubCuentasContactoID_EJERCICIO].AsInteger := aValue;
end;

function TSubCuentasContactoDataTableRules.GetID_EJERCICIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_EJERCICIO].IsNull;
end;

procedure TSubCuentasContactoDataTableRules.SetID_EJERCICIOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_SubCuentasContactoID_EJERCICIO].AsVariant := Null;
end;

function TSubCuentasContactoDataTableRules.GetID_CONTACTOValue: Integer;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_CONTACTO].AsInteger;
end;

procedure TSubCuentasContactoDataTableRules.SetID_CONTACTOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_SubCuentasContactoID_CONTACTO].AsInteger := aValue;
end;

function TSubCuentasContactoDataTableRules.GetID_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_SubCuentasContactoID_CONTACTO].IsNull;
end;

procedure TSubCuentasContactoDataTableRules.SetID_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_SubCuentasContactoID_CONTACTO].AsVariant := Null;
end;


{ TContactosDataTableRules }
constructor TContactosDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TContactosDataTableRules.Destroy;
begin
  inherited;
end;

procedure TContactosDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ContactosNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TContactosDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosID].AsInteger;
end;

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

function TContactosDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosID].IsNull;
end;

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

function TContactosDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosID_CATEGORIA].AsInteger;
end;

procedure TContactosDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ContactosID_CATEGORIA].AsInteger := aValue;
end;

function TContactosDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosID_CATEGORIA].IsNull;
end;

procedure TContactosDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosID_CATEGORIA].AsVariant := Null;
end;

function TContactosDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_ContactosNIF_CIF].AsString;
end;

procedure TContactosDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosNIF_CIF].AsString := aValue;
end;

function TContactosDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosNIF_CIF].IsNull;
end;

procedure TContactosDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosNIF_CIF].AsVariant := Null;
end;

function TContactosDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ContactosNOMBRE].AsString;
end;

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

function TContactosDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosNOMBRE].IsNull;
end;

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

function TContactosDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_ContactosPERSONA_CONTACTO].AsString;
end;

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

function TContactosDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosPERSONA_CONTACTO].IsNull;
end;

procedure TContactosDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosPERSONA_CONTACTO].AsVariant := Null;
end;

function TContactosDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_ContactosCALLE].AsString;
end;

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

function TContactosDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosCALLE].IsNull;
end;

procedure TContactosDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosCALLE].AsVariant := Null;
end;

function TContactosDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_ContactosPOBLACION].AsString;
end;

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

function TContactosDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosPOBLACION].IsNull;
end;

procedure TContactosDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosPOBLACION].AsVariant := Null;
end;

function TContactosDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_ContactosPROVINCIA].AsString;
end;

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

function TContactosDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosPROVINCIA].IsNull;
end;

procedure TContactosDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosPROVINCIA].AsVariant := Null;
end;

function TContactosDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_ContactosCODIGO_POSTAL].AsString;
end;

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

function TContactosDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosCODIGO_POSTAL].IsNull;
end;

procedure TContactosDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosCODIGO_POSTAL].AsVariant := Null;
end;

function TContactosDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_ContactosPAIS].AsString;
end;

procedure TContactosDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosPAIS].AsString := aValue;
end;

function TContactosDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosPAIS].IsNull;
end;

procedure TContactosDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosPAIS].AsVariant := Null;
end;

function TContactosDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_ContactosIDIOMA_ISO].AsString;
end;

procedure TContactosDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosIDIOMA_ISO].AsString := aValue;
end;

function TContactosDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosIDIOMA_ISO].IsNull;
end;

procedure TContactosDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosIDIOMA_ISO].AsVariant := Null;
end;

function TContactosDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_ContactosIDIOMA].AsString;
end;

procedure TContactosDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosIDIOMA].AsString := aValue;
end;

function TContactosDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosIDIOMA].IsNull;
end;

procedure TContactosDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosIDIOMA].AsVariant := Null;
end;

function TContactosDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_ContactosTELEFONO_1].AsString;
end;

procedure TContactosDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosTELEFONO_1].AsString := aValue;
end;

function TContactosDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosTELEFONO_1].IsNull;
end;

procedure TContactosDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosTELEFONO_1].AsVariant := Null;
end;

function TContactosDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_ContactosTELEFONO_2].AsString;
end;

procedure TContactosDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosTELEFONO_2].AsString := aValue;
end;

function TContactosDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosTELEFONO_2].IsNull;
end;

procedure TContactosDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosTELEFONO_2].AsVariant := Null;
end;

function TContactosDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_ContactosMOVIL_1].AsString;
end;

procedure TContactosDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosMOVIL_1].AsString := aValue;
end;

function TContactosDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosMOVIL_1].IsNull;
end;

procedure TContactosDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosMOVIL_1].AsVariant := Null;
end;

function TContactosDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_ContactosMOVIL_2].AsString;
end;

procedure TContactosDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosMOVIL_2].AsString := aValue;
end;

function TContactosDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosMOVIL_2].IsNull;
end;

procedure TContactosDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosMOVIL_2].AsVariant := Null;
end;

function TContactosDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_ContactosFAX].AsString;
end;

procedure TContactosDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosFAX].AsString := aValue;
end;

function TContactosDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosFAX].IsNull;
end;

procedure TContactosDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosFAX].AsVariant := Null;
end;

function TContactosDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_ContactosEMAIL_1].AsString;
end;

procedure TContactosDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosEMAIL_1].AsString := aValue;
end;

function TContactosDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosEMAIL_1].IsNull;
end;

procedure TContactosDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosEMAIL_1].AsVariant := Null;
end;

function TContactosDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_ContactosEMAIL_2].AsString;
end;

procedure TContactosDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ContactosEMAIL_2].AsString := aValue;
end;

function TContactosDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosEMAIL_2].IsNull;
end;

procedure TContactosDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosEMAIL_2].AsVariant := Null;
end;

function TContactosDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_ContactosPAGINA_WEB].AsString;
end;

procedure TContactosDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosPAGINA_WEB].AsString := aValue;
end;

function TContactosDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosPAGINA_WEB].IsNull;
end;

procedure TContactosDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosPAGINA_WEB].AsVariant := Null;
end;

function TContactosDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_ContactosNOTAS].AsString;
end;

function TContactosDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosNOTAS].IsNull;
end;

procedure TContactosDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosNOTAS].AsVariant := Null;
end;

function TContactosDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_ContactosFECHA_ALTA].AsDateTime;
end;

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

function TContactosDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosFECHA_ALTA].IsNull;
end;

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

function TContactosDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_ContactosFECHA_MODIFICACION].AsDateTime;
end;

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

function TContactosDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosFECHA_MODIFICACION].IsNull;
end;

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

function TContactosDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_ContactosUSUARIO].AsString;
end;

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

function TContactosDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosUSUARIO].IsNull;
end;

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

function TContactosDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosID_EMPRESA].AsInteger;
end;

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

function TContactosDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosID_EMPRESA].IsNull;
end;

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

function TContactosDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_ContactosREFERENCIA].AsString;
end;

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

function TContactosDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosREFERENCIA].IsNull;
end;

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

function TContactosDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosID_TIENDA].AsInteger;
end;

procedure TContactosDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ContactosID_TIENDA].AsInteger := aValue;
end;

function TContactosDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosID_TIENDA].IsNull;
end;

procedure TContactosDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosID_TIENDA].AsVariant := Null;
end;

function TContactosDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_ContactosTIENDA].AsString;
end;

procedure TContactosDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosTIENDA].AsString := aValue;
end;

function TContactosDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosTIENDA].IsNull;
end;

procedure TContactosDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosTIENDA].AsVariant := Null;
end;


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

destructor TGruposClienteDataTableRules.Destroy;
begin
  inherited;
end;

function TGruposClienteDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_GruposClienteID].AsInteger;
end;

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

function TGruposClienteDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_GruposClienteID].IsNull;
end;

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

function TGruposClienteDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_GruposClienteDESCRIPCION].AsString;
end;

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

function TGruposClienteDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_GruposClienteDESCRIPCION].IsNull;
end;

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


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

destructor TDatosBancariosDataTableRules.Destroy;
begin
  inherited;
end;

function TDatosBancariosDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_DatosBancariosID].AsInteger;
end;

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

function TDatosBancariosDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosID].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetID_CONTACTOValue: Integer;
begin
  result := DataTable.Fields[idx_DatosBancariosID_CONTACTO].AsInteger;
end;

procedure TDatosBancariosDataTableRules.SetID_CONTACTOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_DatosBancariosID_CONTACTO].AsInteger := aValue;
end;

function TDatosBancariosDataTableRules.GetID_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosID_CONTACTO].IsNull;
end;

procedure TDatosBancariosDataTableRules.SetID_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DatosBancariosID_CONTACTO].AsVariant := Null;
end;

function TDatosBancariosDataTableRules.GetTITULARValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosTITULAR].AsString;
end;

procedure TDatosBancariosDataTableRules.SetTITULARValue(const aValue: String);
begin
  DataTable.Fields[idx_DatosBancariosTITULAR].AsString := aValue;
end;

function TDatosBancariosDataTableRules.GetTITULARIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosTITULAR].IsNull;
end;

procedure TDatosBancariosDataTableRules.SetTITULARIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DatosBancariosTITULAR].AsVariant := Null;
end;

function TDatosBancariosDataTableRules.GetENTIDADValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosENTIDAD].AsString;
end;

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

function TDatosBancariosDataTableRules.GetENTIDADIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosENTIDAD].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetSUCURSALValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosSUCURSAL].AsString;
end;

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

function TDatosBancariosDataTableRules.GetSUCURSALIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosSUCURSAL].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetDCValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosDC].AsString;
end;

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

function TDatosBancariosDataTableRules.GetDCIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosDC].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetCUENTAValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosCUENTA].AsString;
end;

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

function TDatosBancariosDataTableRules.GetCUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosCUENTA].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_DatosBancariosFECHA_ALTA].AsDateTime;
end;

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

function TDatosBancariosDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosFECHA_ALTA].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_DatosBancariosFECHA_MODIFICACION].AsDateTime;
end;

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

function TDatosBancariosDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosFECHA_MODIFICACION].IsNull;
end;

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

function TDatosBancariosDataTableRules.GetIBANValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosIBAN].AsString;
end;

procedure TDatosBancariosDataTableRules.SetIBANValue(const aValue: String);
begin
  DataTable.Fields[idx_DatosBancariosIBAN].AsString := aValue;
end;

function TDatosBancariosDataTableRules.GetIBANIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosIBAN].IsNull;
end;

procedure TDatosBancariosDataTableRules.SetIBANIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DatosBancariosIBAN].AsVariant := Null;
end;

function TDatosBancariosDataTableRules.GetSWIFTValue: String;
begin
  result := DataTable.Fields[idx_DatosBancariosSWIFT].AsString;
end;

procedure TDatosBancariosDataTableRules.SetSWIFTValue(const aValue: String);
begin
  DataTable.Fields[idx_DatosBancariosSWIFT].AsString := aValue;
end;

function TDatosBancariosDataTableRules.GetSWIFTIsNull: boolean;
begin
  result := DataTable.Fields[idx_DatosBancariosSWIFT].IsNull;
end;

procedure TDatosBancariosDataTableRules.SetSWIFTIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DatosBancariosSWIFT].AsVariant := Null;
end;


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

destructor TContactosDireccionesDataTableRules.Destroy;
begin
  inherited;
end;

function TContactosDireccionesDataTableRules.GetID_CONTACTOValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosDireccionesID_CONTACTO].AsInteger;
end;

procedure TContactosDireccionesDataTableRules.SetID_CONTACTOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ContactosDireccionesID_CONTACTO].AsInteger := aValue;
end;

function TContactosDireccionesDataTableRules.GetID_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesID_CONTACTO].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetID_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesID_CONTACTO].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetID_DIRECCIONValue: Integer;
begin
  result := DataTable.Fields[idx_ContactosDireccionesID_DIRECCION].AsInteger;
end;

procedure TContactosDireccionesDataTableRules.SetID_DIRECCIONValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ContactosDireccionesID_DIRECCION].AsInteger := aValue;
end;

function TContactosDireccionesDataTableRules.GetID_DIRECCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesID_DIRECCION].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetID_DIRECCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesID_DIRECCION].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesNOMBRE].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesNOMBRE].IsNull;
end;

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

function TContactosDireccionesDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesNIF_CIF].AsString;
end;

procedure TContactosDireccionesDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosDireccionesNIF_CIF].AsString := aValue;
end;

function TContactosDireccionesDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesNIF_CIF].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesNIF_CIF].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesCALLE].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesCALLE].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesCALLE].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPOBLACION].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPOBLACION].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesPOBLACION].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPROVINCIA].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPROVINCIA].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesPROVINCIA].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesCODIGO_POSTAL].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesCODIGO_POSTAL].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesCODIGO_POSTAL].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetTELEFONOValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesTELEFONO].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetTELEFONOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesTELEFONO].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetTELEFONOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesTELEFONO].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetMOVILValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesMOVIL].AsString;
end;

procedure TContactosDireccionesDataTableRules.SetMOVILValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosDireccionesMOVIL].AsString := aValue;
end;

function TContactosDireccionesDataTableRules.GetMOVILIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesMOVIL].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetMOVILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesMOVIL].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesFAX].AsString;
end;

procedure TContactosDireccionesDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosDireccionesFAX].AsString := aValue;
end;

function TContactosDireccionesDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesFAX].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesFAX].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetEMAILValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesEMAIL].AsString;
end;

procedure TContactosDireccionesDataTableRules.SetEMAILValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosDireccionesEMAIL].AsString := aValue;
end;

function TContactosDireccionesDataTableRules.GetEMAILIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesEMAIL].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetEMAILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesEMAIL].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPERSONA_CONTACTO].AsString;
end;

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

function TContactosDireccionesDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPERSONA_CONTACTO].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesPERSONA_CONTACTO].AsVariant := Null;
end;

function TContactosDireccionesDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPAIS].AsString;
end;

procedure TContactosDireccionesDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_ContactosDireccionesPAIS].AsString := aValue;
end;

function TContactosDireccionesDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_ContactosDireccionesPAIS].IsNull;
end;

procedure TContactosDireccionesDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ContactosDireccionesPAIS].AsVariant := Null;
end;


{ TClientesDataTableRules }
constructor TClientesDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);

  StrList := TStringList.Create;
  StrList.OnChange := DIST_FORMA_PAGO_OnChange;
  f_DIST_FORMA_PAGO := NewROStrings(StrList,True);

  StrList := TStringList.Create;
  StrList.OnChange := DIST_NOTAS_OnChange;
  f_DIST_NOTAS := NewROStrings(StrList,True);

  StrList := TStringList.Create;
  StrList.OnChange := DIST_LOPD_OnChange;
  f_DIST_LOPD := NewROStrings(StrList,True);

  StrList := TStringList.Create;
  StrList.OnChange := DIST_CONDICIONES_OnChange;
  f_DIST_CONDICIONES := NewROStrings(StrList,True);
end;

destructor TClientesDataTableRules.Destroy;
begin
  inherited;
end;

procedure TClientesDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ClientesNOTAS].AsVariant := TStringList(Sender).Text;
end;

procedure TClientesDataTableRules.DIST_FORMA_PAGO_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ClientesDIST_FORMA_PAGO].AsVariant := TStringList(Sender).Text;
end;

procedure TClientesDataTableRules.DIST_NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ClientesDIST_NOTAS].AsVariant := TStringList(Sender).Text;
end;

procedure TClientesDataTableRules.DIST_LOPD_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ClientesDIST_LOPD].AsVariant := TStringList(Sender).Text;
end;

procedure TClientesDataTableRules.DIST_CONDICIONES_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ClientesDIST_CONDICIONES].AsVariant := TStringList(Sender).Text;
end;

function TClientesDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID].AsInteger;
end;

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

function TClientesDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID].IsNull;
end;

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

function TClientesDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_CATEGORIA].AsInteger;
end;

procedure TClientesDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesID_CATEGORIA].AsInteger := aValue;
end;

function TClientesDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_CATEGORIA].IsNull;
end;

procedure TClientesDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesID_CATEGORIA].AsVariant := Null;
end;

function TClientesDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_ClientesNIF_CIF].AsString;
end;

procedure TClientesDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesNIF_CIF].AsString := aValue;
end;

function TClientesDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesNIF_CIF].IsNull;
end;

procedure TClientesDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesNIF_CIF].AsVariant := Null;
end;

function TClientesDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ClientesNOMBRE].AsString;
end;

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

function TClientesDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesNOMBRE].IsNull;
end;

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

function TClientesDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_ClientesPERSONA_CONTACTO].AsString;
end;

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

function TClientesDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPERSONA_CONTACTO].IsNull;
end;

procedure TClientesDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPERSONA_CONTACTO].AsVariant := Null;
end;

function TClientesDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_ClientesCALLE].AsString;
end;

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

function TClientesDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesCALLE].IsNull;
end;

procedure TClientesDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesCALLE].AsVariant := Null;
end;

function TClientesDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_ClientesPOBLACION].AsString;
end;

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

function TClientesDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPOBLACION].IsNull;
end;

procedure TClientesDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPOBLACION].AsVariant := Null;
end;

function TClientesDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_ClientesPROVINCIA].AsString;
end;

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

function TClientesDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPROVINCIA].IsNull;
end;

procedure TClientesDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPROVINCIA].AsVariant := Null;
end;

function TClientesDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_ClientesCODIGO_POSTAL].AsString;
end;

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

function TClientesDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesCODIGO_POSTAL].IsNull;
end;

procedure TClientesDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesCODIGO_POSTAL].AsVariant := Null;
end;

function TClientesDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_ClientesPAIS].AsString;
end;

procedure TClientesDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesPAIS].AsString := aValue;
end;

function TClientesDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPAIS].IsNull;
end;

procedure TClientesDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPAIS].AsVariant := Null;
end;

function TClientesDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_ClientesIDIOMA_ISO].AsString;
end;

procedure TClientesDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesIDIOMA_ISO].AsString := aValue;
end;

function TClientesDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesIDIOMA_ISO].IsNull;
end;

procedure TClientesDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesIDIOMA_ISO].AsVariant := Null;
end;

function TClientesDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_ClientesIDIOMA].AsString;
end;

procedure TClientesDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesIDIOMA].AsString := aValue;
end;

function TClientesDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesIDIOMA].IsNull;
end;

procedure TClientesDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesIDIOMA].AsVariant := Null;
end;

function TClientesDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_ClientesTELEFONO_1].AsString;
end;

procedure TClientesDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesTELEFONO_1].AsString := aValue;
end;

function TClientesDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesTELEFONO_1].IsNull;
end;

procedure TClientesDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesTELEFONO_1].AsVariant := Null;
end;

function TClientesDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_ClientesTELEFONO_2].AsString;
end;

procedure TClientesDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesTELEFONO_2].AsString := aValue;
end;

function TClientesDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesTELEFONO_2].IsNull;
end;

procedure TClientesDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesTELEFONO_2].AsVariant := Null;
end;

function TClientesDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_ClientesMOVIL_1].AsString;
end;

procedure TClientesDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesMOVIL_1].AsString := aValue;
end;

function TClientesDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesMOVIL_1].IsNull;
end;

procedure TClientesDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesMOVIL_1].AsVariant := Null;
end;

function TClientesDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_ClientesMOVIL_2].AsString;
end;

procedure TClientesDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesMOVIL_2].AsString := aValue;
end;

function TClientesDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesMOVIL_2].IsNull;
end;

procedure TClientesDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesMOVIL_2].AsVariant := Null;
end;

function TClientesDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_ClientesFAX].AsString;
end;

procedure TClientesDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesFAX].AsString := aValue;
end;

function TClientesDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesFAX].IsNull;
end;

procedure TClientesDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesFAX].AsVariant := Null;
end;

function TClientesDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_ClientesEMAIL_1].AsString;
end;

procedure TClientesDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesEMAIL_1].AsString := aValue;
end;

function TClientesDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesEMAIL_1].IsNull;
end;

procedure TClientesDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesEMAIL_1].AsVariant := Null;
end;

function TClientesDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_ClientesEMAIL_2].AsString;
end;

procedure TClientesDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ClientesEMAIL_2].AsString := aValue;
end;

function TClientesDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesEMAIL_2].IsNull;
end;

procedure TClientesDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesEMAIL_2].AsVariant := Null;
end;

function TClientesDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_ClientesPAGINA_WEB].AsString;
end;

procedure TClientesDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesPAGINA_WEB].AsString := aValue;
end;

function TClientesDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPAGINA_WEB].IsNull;
end;

procedure TClientesDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPAGINA_WEB].AsVariant := Null;
end;

function TClientesDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_ClientesNOTAS].AsString;
end;

function TClientesDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesNOTAS].IsNull;
end;

procedure TClientesDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesNOTAS].AsVariant := Null;
end;

function TClientesDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_ClientesFECHA_ALTA].AsDateTime;
end;

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

function TClientesDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesFECHA_ALTA].IsNull;
end;

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

function TClientesDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_ClientesFECHA_MODIFICACION].AsDateTime;
end;

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

function TClientesDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesFECHA_MODIFICACION].IsNull;
end;

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

function TClientesDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_ClientesUSUARIO].AsString;
end;

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

function TClientesDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesUSUARIO].IsNull;
end;

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

function TClientesDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_EMPRESA].AsInteger;
end;

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

function TClientesDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_EMPRESA].IsNull;
end;

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

function TClientesDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_ClientesREFERENCIA].AsString;
end;

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

function TClientesDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesREFERENCIA].IsNull;
end;

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

function TClientesDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_TIENDA].AsInteger;
end;

procedure TClientesDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesID_TIENDA].AsInteger := aValue;
end;

function TClientesDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_TIENDA].IsNull;
end;

procedure TClientesDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesID_TIENDA].AsVariant := Null;
end;

function TClientesDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_ClientesTIENDA].AsString;
end;

procedure TClientesDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesTIENDA].AsString := aValue;
end;

function TClientesDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesTIENDA].IsNull;
end;

procedure TClientesDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesTIENDA].AsVariant := Null;
end;

function TClientesDataTableRules.GetGRUPO_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_ClientesGRUPO_CLIENTE].AsString;
end;

procedure TClientesDataTableRules.SetGRUPO_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesGRUPO_CLIENTE].AsString := aValue;
end;

function TClientesDataTableRules.GetGRUPO_CLIENTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesGRUPO_CLIENTE].IsNull;
end;

procedure TClientesDataTableRules.SetGRUPO_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesGRUPO_CLIENTE].AsVariant := Null;
end;

function TClientesDataTableRules.GetNOMBRE_COMERCIALValue: String;
begin
  result := DataTable.Fields[idx_ClientesNOMBRE_COMERCIAL].AsString;
end;

procedure TClientesDataTableRules.SetNOMBRE_COMERCIALValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesNOMBRE_COMERCIAL].AsString := aValue;
end;

function TClientesDataTableRules.GetNOMBRE_COMERCIALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesNOMBRE_COMERCIAL].IsNull;
end;

procedure TClientesDataTableRules.SetNOMBRE_COMERCIALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesNOMBRE_COMERCIAL].AsVariant := Null;
end;

function TClientesDataTableRules.GetBLOQUEADOValue: SmallInt;
begin
  result := DataTable.Fields[idx_ClientesBLOQUEADO].AsSmallInt;
end;

procedure TClientesDataTableRules.SetBLOQUEADOValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ClientesBLOQUEADO].AsSmallInt := aValue;
end;

function TClientesDataTableRules.GetBLOQUEADOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesBLOQUEADO].IsNull;
end;

procedure TClientesDataTableRules.SetBLOQUEADOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesBLOQUEADO].AsVariant := Null;
end;

function TClientesDataTableRules.GetREGIMEN_IVAValue: String;
begin
  result := DataTable.Fields[idx_ClientesREGIMEN_IVA].AsString;
end;

procedure TClientesDataTableRules.SetREGIMEN_IVAValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesREGIMEN_IVA].AsString := aValue;
end;

function TClientesDataTableRules.GetREGIMEN_IVAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesREGIMEN_IVA].IsNull;
end;

procedure TClientesDataTableRules.SetREGIMEN_IVAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesREGIMEN_IVA].AsVariant := Null;
end;

function TClientesDataTableRules.GetMOTIVO_BLOQUEOValue: String;
begin
  result := DataTable.Fields[idx_ClientesMOTIVO_BLOQUEO].AsString;
end;

procedure TClientesDataTableRules.SetMOTIVO_BLOQUEOValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesMOTIVO_BLOQUEO].AsString := aValue;
end;

function TClientesDataTableRules.GetMOTIVO_BLOQUEOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesMOTIVO_BLOQUEO].IsNull;
end;

procedure TClientesDataTableRules.SetMOTIVO_BLOQUEOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesMOTIVO_BLOQUEO].AsVariant := Null;
end;

function TClientesDataTableRules.GetRECARGO_EQUIVALENCIAValue: SmallInt;
begin
  result := DataTable.Fields[idx_ClientesRECARGO_EQUIVALENCIA].AsSmallInt;
end;

procedure TClientesDataTableRules.SetRECARGO_EQUIVALENCIAValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ClientesRECARGO_EQUIVALENCIA].AsSmallInt := aValue;
end;

function TClientesDataTableRules.GetRECARGO_EQUIVALENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesRECARGO_EQUIVALENCIA].IsNull;
end;

procedure TClientesDataTableRules.SetRECARGO_EQUIVALENCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesRECARGO_EQUIVALENCIA].AsVariant := Null;
end;

function TClientesDataTableRules.GetID_TIPO_IVAValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_TIPO_IVA].AsInteger;
end;

procedure TClientesDataTableRules.SetID_TIPO_IVAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesID_TIPO_IVA].AsInteger := aValue;
end;

function TClientesDataTableRules.GetID_TIPO_IVAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_TIPO_IVA].IsNull;
end;

procedure TClientesDataTableRules.SetID_TIPO_IVAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesID_TIPO_IVA].AsVariant := Null;
end;

function TClientesDataTableRules.GetID_FORMA_PAGOValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_FORMA_PAGO].AsInteger;
end;

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

function TClientesDataTableRules.GetID_FORMA_PAGOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_FORMA_PAGO].IsNull;
end;

procedure TClientesDataTableRules.SetID_FORMA_PAGOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesID_FORMA_PAGO].AsVariant := Null;
end;

function TClientesDataTableRules.GetTIENDA_WEBValue: SmallInt;
begin
  result := DataTable.Fields[idx_ClientesTIENDA_WEB].AsSmallInt;
end;

procedure TClientesDataTableRules.SetTIENDA_WEBValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ClientesTIENDA_WEB].AsSmallInt := aValue;
end;

function TClientesDataTableRules.GetTIENDA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesTIENDA_WEB].IsNull;
end;

procedure TClientesDataTableRules.SetTIENDA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesTIENDA_WEB].AsVariant := Null;
end;

function TClientesDataTableRules.GetCODIGO_ASIGNADOValue: String;
begin
  result := DataTable.Fields[idx_ClientesCODIGO_ASIGNADO].AsString;
end;

procedure TClientesDataTableRules.SetCODIGO_ASIGNADOValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesCODIGO_ASIGNADO].AsString := aValue;
end;

function TClientesDataTableRules.GetCODIGO_ASIGNADOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesCODIGO_ASIGNADO].IsNull;
end;

procedure TClientesDataTableRules.SetCODIGO_ASIGNADOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesCODIGO_ASIGNADO].AsVariant := Null;
end;

function TClientesDataTableRules.GetIGNORAR_CONTABILIDADValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesIGNORAR_CONTABILIDAD].AsInteger;
end;

procedure TClientesDataTableRules.SetIGNORAR_CONTABILIDADValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesIGNORAR_CONTABILIDAD].AsInteger := aValue;
end;

function TClientesDataTableRules.GetIGNORAR_CONTABILIDADIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesIGNORAR_CONTABILIDAD].IsNull;
end;

procedure TClientesDataTableRules.SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesIGNORAR_CONTABILIDAD].AsVariant := Null;
end;

function TClientesDataTableRules.GetTIENE_SUBCUENTAValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesTIENE_SUBCUENTA].AsInteger;
end;

procedure TClientesDataTableRules.SetTIENE_SUBCUENTAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesTIENE_SUBCUENTA].AsInteger := aValue;
end;

function TClientesDataTableRules.GetTIENE_SUBCUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesTIENE_SUBCUENTA].IsNull;
end;

procedure TClientesDataTableRules.SetTIENE_SUBCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesTIENE_SUBCUENTA].AsVariant := Null;
end;

function TClientesDataTableRules.GetPROCEDENCIA_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_ClientesPROCEDENCIA_CLIENTE].AsString;
end;

procedure TClientesDataTableRules.SetPROCEDENCIA_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesPROCEDENCIA_CLIENTE].AsString := aValue;
end;

function TClientesDataTableRules.GetPROCEDENCIA_CLIENTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPROCEDENCIA_CLIENTE].IsNull;
end;

procedure TClientesDataTableRules.SetPROCEDENCIA_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPROCEDENCIA_CLIENTE].AsVariant := Null;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_1Value: Integer;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].AsInteger;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].AsInteger := aValue;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].IsNull;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].AsVariant := Null;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_2Value: Integer;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_2].AsInteger;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_2].AsInteger := aValue;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_2].IsNull;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_2].AsVariant := Null;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_3Value: Integer;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_3].AsInteger;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_3].AsInteger := aValue;
end;

function TClientesDataTableRules.GetVENCIMIENTO_FACTURAS_3IsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_3].IsNull;
end;

procedure TClientesDataTableRules.SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_3].AsVariant := Null;
end;

function TClientesDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO].AsFloat;
end;

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

function TClientesDataTableRules.GetDESCUENTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO].IsNull;
end;

procedure TClientesDataTableRules.SetDESCUENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDESCUENTO].AsVariant := Null;
end;

function TClientesDataTableRules.GetDESCUENTO_LINEAValue: Float;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO_LINEA].AsFloat;
end;

procedure TClientesDataTableRules.SetDESCUENTO_LINEAValue(const aValue: Float);
begin
  DataTable.Fields[idx_ClientesDESCUENTO_LINEA].AsFloat := aValue;
end;

function TClientesDataTableRules.GetDESCUENTO_LINEAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO_LINEA].IsNull;
end;

procedure TClientesDataTableRules.SetDESCUENTO_LINEAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDESCUENTO_LINEA].AsVariant := Null;
end;

function TClientesDataTableRules.GetPRECIO_PUNTOValue: Currency;
begin
  result := DataTable.Fields[idx_ClientesPRECIO_PUNTO].AsCurrency;
end;

procedure TClientesDataTableRules.SetPRECIO_PUNTOValue(const aValue: Currency);
begin
  DataTable.Fields[idx_ClientesPRECIO_PUNTO].AsCurrency := aValue;
end;

function TClientesDataTableRules.GetPRECIO_PUNTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesPRECIO_PUNTO].IsNull;
end;

procedure TClientesDataTableRules.SetPRECIO_PUNTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesPRECIO_PUNTO].AsVariant := Null;
end;

function TClientesDataTableRules.GetID_AGENTEValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesID_AGENTE].AsInteger;
end;

procedure TClientesDataTableRules.SetID_AGENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesID_AGENTE].AsInteger := aValue;
end;

function TClientesDataTableRules.GetID_AGENTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesID_AGENTE].IsNull;
end;

procedure TClientesDataTableRules.SetID_AGENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesID_AGENTE].AsVariant := Null;
end;

function TClientesDataTableRules.GetAGENTEValue: String;
begin
  result := DataTable.Fields[idx_ClientesAGENTE].AsString;
end;

procedure TClientesDataTableRules.SetAGENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesAGENTE].AsString := aValue;
end;

function TClientesDataTableRules.GetAGENTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesAGENTE].IsNull;
end;

procedure TClientesDataTableRules.SetAGENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesAGENTE].AsVariant := Null;
end;

function TClientesDataTableRules.GetDELEGACIONValue: String;
begin
  result := DataTable.Fields[idx_ClientesDELEGACION].AsString;
end;

procedure TClientesDataTableRules.SetDELEGACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesDELEGACION].AsString := aValue;
end;

function TClientesDataTableRules.GetDELEGACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDELEGACION].IsNull;
end;

procedure TClientesDataTableRules.SetDELEGACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDELEGACION].AsVariant := Null;
end;

function TClientesDataTableRules.GetDESCUENTO_CAPITULOValue: Float;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO_CAPITULO].AsFloat;
end;

procedure TClientesDataTableRules.SetDESCUENTO_CAPITULOValue(const aValue: Float);
begin
  DataTable.Fields[idx_ClientesDESCUENTO_CAPITULO].AsFloat := aValue;
end;

function TClientesDataTableRules.GetDESCUENTO_CAPITULOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDESCUENTO_CAPITULO].IsNull;
end;

procedure TClientesDataTableRules.SetDESCUENTO_CAPITULOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDESCUENTO_CAPITULO].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_EMAILValue: String;
begin
  result := DataTable.Fields[idx_ClientesDIST_EMAIL].AsString;
end;

procedure TClientesDataTableRules.SetDIST_EMAILValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesDIST_EMAIL].AsString := aValue;
end;

function TClientesDataTableRules.GetDIST_EMAILIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_EMAIL].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_EMAILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_EMAIL].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_PASSWORDValue: String;
begin
  result := DataTable.Fields[idx_ClientesDIST_PASSWORD].AsString;
end;

procedure TClientesDataTableRules.SetDIST_PASSWORDValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesDIST_PASSWORD].AsString := aValue;
end;

function TClientesDataTableRules.GetDIST_PASSWORDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_PASSWORD].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_PASSWORDIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_PASSWORD].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_VALIDEZValue: String;
begin
  result := DataTable.Fields[idx_ClientesDIST_VALIDEZ].AsString;
end;

procedure TClientesDataTableRules.SetDIST_VALIDEZValue(const aValue: String);
begin
  DataTable.Fields[idx_ClientesDIST_VALIDEZ].AsString := aValue;
end;

function TClientesDataTableRules.GetDIST_VALIDEZIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_VALIDEZ].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_VALIDEZIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_VALIDEZ].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_FORMA_PAGOValue: IROStrings;
begin
  result := f_DIST_FORMA_PAGO;
  result.Text := DataTable.Fields[idx_ClientesDIST_FORMA_PAGO].AsString;
end;

function TClientesDataTableRules.GetDIST_FORMA_PAGOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_FORMA_PAGO].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_FORMA_PAGOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_FORMA_PAGO].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_NOTASValue: IROStrings;
begin
  result := f_DIST_NOTAS;
  result.Text := DataTable.Fields[idx_ClientesDIST_NOTAS].AsString;
end;

function TClientesDataTableRules.GetDIST_NOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_NOTAS].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_NOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_NOTAS].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_LOPDValue: IROStrings;
begin
  result := f_DIST_LOPD;
  result.Text := DataTable.Fields[idx_ClientesDIST_LOPD].AsString;
end;

function TClientesDataTableRules.GetDIST_LOPDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_LOPD].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_LOPDIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_LOPD].AsVariant := Null;
end;

function TClientesDataTableRules.GetDIST_CONDICIONESValue: IROStrings;
begin
  result := f_DIST_CONDICIONES;
  result.Text := DataTable.Fields[idx_ClientesDIST_CONDICIONES].AsString;
end;

function TClientesDataTableRules.GetDIST_CONDICIONESIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDIST_CONDICIONES].IsNull;
end;

procedure TClientesDataTableRules.SetDIST_CONDICIONESIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDIST_CONDICIONES].AsVariant := Null;
end;


{ TProveedoresDataTableRules }
constructor TProveedoresDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TProveedoresDataTableRules.Destroy;
begin
  inherited;
end;

procedure TProveedoresDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ProveedoresNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TProveedoresDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID].AsInteger;
end;

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

function TProveedoresDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID].IsNull;
end;

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

function TProveedoresDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID_CATEGORIA].AsInteger;
end;

procedure TProveedoresDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresID_CATEGORIA].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID_CATEGORIA].IsNull;
end;

procedure TProveedoresDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresID_CATEGORIA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresNIF_CIF].AsString;
end;

procedure TProveedoresDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresNIF_CIF].AsString := aValue;
end;

function TProveedoresDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresNIF_CIF].IsNull;
end;

procedure TProveedoresDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresNIF_CIF].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresNOMBRE].AsString;
end;

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

function TProveedoresDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresNOMBRE].IsNull;
end;

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

function TProveedoresDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresPERSONA_CONTACTO].AsString;
end;

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

function TProveedoresDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresPERSONA_CONTACTO].IsNull;
end;

procedure TProveedoresDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresPERSONA_CONTACTO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresCALLE].AsString;
end;

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

function TProveedoresDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresCALLE].IsNull;
end;

procedure TProveedoresDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresCALLE].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresPOBLACION].AsString;
end;

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

function TProveedoresDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresPOBLACION].IsNull;
end;

procedure TProveedoresDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresPOBLACION].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresPROVINCIA].AsString;
end;

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

function TProveedoresDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresPROVINCIA].IsNull;
end;

procedure TProveedoresDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresPROVINCIA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresCODIGO_POSTAL].AsString;
end;

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

function TProveedoresDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresCODIGO_POSTAL].IsNull;
end;

procedure TProveedoresDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresCODIGO_POSTAL].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresPAIS].AsString;
end;

procedure TProveedoresDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresPAIS].AsString := aValue;
end;

function TProveedoresDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresPAIS].IsNull;
end;

procedure TProveedoresDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresPAIS].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresIDIOMA_ISO].AsString;
end;

procedure TProveedoresDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresIDIOMA_ISO].AsString := aValue;
end;

function TProveedoresDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresIDIOMA_ISO].IsNull;
end;

procedure TProveedoresDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresIDIOMA_ISO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresIDIOMA].AsString;
end;

procedure TProveedoresDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresIDIOMA].AsString := aValue;
end;

function TProveedoresDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresIDIOMA].IsNull;
end;

procedure TProveedoresDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresIDIOMA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresTELEFONO_1].AsString;
end;

procedure TProveedoresDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresTELEFONO_1].AsString := aValue;
end;

function TProveedoresDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresTELEFONO_1].IsNull;
end;

procedure TProveedoresDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresTELEFONO_1].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresTELEFONO_2].AsString;
end;

procedure TProveedoresDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresTELEFONO_2].AsString := aValue;
end;

function TProveedoresDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresTELEFONO_2].IsNull;
end;

procedure TProveedoresDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresTELEFONO_2].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresMOVIL_1].AsString;
end;

procedure TProveedoresDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresMOVIL_1].AsString := aValue;
end;

function TProveedoresDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresMOVIL_1].IsNull;
end;

procedure TProveedoresDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresMOVIL_1].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresMOVIL_2].AsString;
end;

procedure TProveedoresDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresMOVIL_2].AsString := aValue;
end;

function TProveedoresDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresMOVIL_2].IsNull;
end;

procedure TProveedoresDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresMOVIL_2].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresFAX].AsString;
end;

procedure TProveedoresDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresFAX].AsString := aValue;
end;

function TProveedoresDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresFAX].IsNull;
end;

procedure TProveedoresDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresFAX].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresEMAIL_1].AsString;
end;

procedure TProveedoresDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresEMAIL_1].AsString := aValue;
end;

function TProveedoresDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresEMAIL_1].IsNull;
end;

procedure TProveedoresDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresEMAIL_1].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_ProveedoresEMAIL_2].AsString;
end;

procedure TProveedoresDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresEMAIL_2].AsString := aValue;
end;

function TProveedoresDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresEMAIL_2].IsNull;
end;

procedure TProveedoresDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresEMAIL_2].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresPAGINA_WEB].AsString;
end;

procedure TProveedoresDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresPAGINA_WEB].AsString := aValue;
end;

function TProveedoresDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresPAGINA_WEB].IsNull;
end;

procedure TProveedoresDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresPAGINA_WEB].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_ProveedoresNOTAS].AsString;
end;

function TProveedoresDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresNOTAS].IsNull;
end;

procedure TProveedoresDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresNOTAS].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_ProveedoresFECHA_ALTA].AsDateTime;
end;

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

function TProveedoresDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresFECHA_ALTA].IsNull;
end;

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

function TProveedoresDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_ProveedoresFECHA_MODIFICACION].AsDateTime;
end;

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

function TProveedoresDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresFECHA_MODIFICACION].IsNull;
end;

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

function TProveedoresDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresUSUARIO].AsString;
end;

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

function TProveedoresDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresUSUARIO].IsNull;
end;

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

function TProveedoresDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID_EMPRESA].AsInteger;
end;

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

function TProveedoresDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID_EMPRESA].IsNull;
end;

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

function TProveedoresDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresREFERENCIA].AsString;
end;

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

function TProveedoresDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresREFERENCIA].IsNull;
end;

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

function TProveedoresDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID_TIENDA].AsInteger;
end;

procedure TProveedoresDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresID_TIENDA].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID_TIENDA].IsNull;
end;

procedure TProveedoresDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresID_TIENDA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresTIENDA].AsString;
end;

procedure TProveedoresDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresTIENDA].AsString := aValue;
end;

function TProveedoresDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresTIENDA].IsNull;
end;

procedure TProveedoresDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresTIENDA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_ProveedoresDESCUENTO].AsFloat;
end;

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

function TProveedoresDataTableRules.GetDESCUENTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresDESCUENTO].IsNull;
end;

procedure TProveedoresDataTableRules.SetDESCUENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresDESCUENTO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetDESCRIPCION_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresDESCRIPCION_PROVEEDOR].AsString;
end;

procedure TProveedoresDataTableRules.SetDESCRIPCION_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresDESCRIPCION_PROVEEDOR].AsString := aValue;
end;

function TProveedoresDataTableRules.GetDESCRIPCION_PROVEEDORIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresDESCRIPCION_PROVEEDOR].IsNull;
end;

procedure TProveedoresDataTableRules.SetDESCRIPCION_PROVEEDORIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresDESCRIPCION_PROVEEDOR].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetCODIGO_ASIGNADOValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresCODIGO_ASIGNADO].AsString;
end;

procedure TProveedoresDataTableRules.SetCODIGO_ASIGNADOValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresCODIGO_ASIGNADO].AsString := aValue;
end;

function TProveedoresDataTableRules.GetCODIGO_ASIGNADOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresCODIGO_ASIGNADO].IsNull;
end;

procedure TProveedoresDataTableRules.SetCODIGO_ASIGNADOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresCODIGO_ASIGNADO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetGRUPO_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresGRUPO_PROVEEDOR].AsString;
end;

procedure TProveedoresDataTableRules.SetGRUPO_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresGRUPO_PROVEEDOR].AsString := aValue;
end;

function TProveedoresDataTableRules.GetGRUPO_PROVEEDORIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresGRUPO_PROVEEDOR].IsNull;
end;

procedure TProveedoresDataTableRules.SetGRUPO_PROVEEDORIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresGRUPO_PROVEEDOR].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetREGIMEN_IVAValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresREGIMEN_IVA].AsString;
end;

procedure TProveedoresDataTableRules.SetREGIMEN_IVAValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresREGIMEN_IVA].AsString := aValue;
end;

function TProveedoresDataTableRules.GetREGIMEN_IVAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresREGIMEN_IVA].IsNull;
end;

procedure TProveedoresDataTableRules.SetREGIMEN_IVAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresREGIMEN_IVA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetID_TIPO_IVAValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID_TIPO_IVA].AsInteger;
end;

procedure TProveedoresDataTableRules.SetID_TIPO_IVAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresID_TIPO_IVA].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetID_TIPO_IVAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID_TIPO_IVA].IsNull;
end;

procedure TProveedoresDataTableRules.SetID_TIPO_IVAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresID_TIPO_IVA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetID_FORMA_PAGOValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresID_FORMA_PAGO].AsInteger;
end;

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

function TProveedoresDataTableRules.GetID_FORMA_PAGOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresID_FORMA_PAGO].IsNull;
end;

procedure TProveedoresDataTableRules.SetID_FORMA_PAGOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresID_FORMA_PAGO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetTIENDA_WEBValue: SmallInt;
begin
  result := DataTable.Fields[idx_ProveedoresTIENDA_WEB].AsSmallInt;
end;

procedure TProveedoresDataTableRules.SetTIENDA_WEBValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ProveedoresTIENDA_WEB].AsSmallInt := aValue;
end;

function TProveedoresDataTableRules.GetTIENDA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresTIENDA_WEB].IsNull;
end;

procedure TProveedoresDataTableRules.SetTIENDA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresTIENDA_WEB].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetHOMOLOGADOValue: SmallInt;
begin
  result := DataTable.Fields[idx_ProveedoresHOMOLOGADO].AsSmallInt;
end;

procedure TProveedoresDataTableRules.SetHOMOLOGADOValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ProveedoresHOMOLOGADO].AsSmallInt := aValue;
end;

function TProveedoresDataTableRules.GetHOMOLOGADOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresHOMOLOGADO].IsNull;
end;

procedure TProveedoresDataTableRules.SetHOMOLOGADOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresHOMOLOGADO].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetCERTIFICACIONValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresCERTIFICACION].AsString;
end;

procedure TProveedoresDataTableRules.SetCERTIFICACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresCERTIFICACION].AsString := aValue;
end;

function TProveedoresDataTableRules.GetCERTIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresCERTIFICACION].IsNull;
end;

procedure TProveedoresDataTableRules.SetCERTIFICACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresCERTIFICACION].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetIGNORAR_CONTABILIDADValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresIGNORAR_CONTABILIDAD].AsInteger;
end;

procedure TProveedoresDataTableRules.SetIGNORAR_CONTABILIDADValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresIGNORAR_CONTABILIDAD].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetIGNORAR_CONTABILIDADIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresIGNORAR_CONTABILIDAD].IsNull;
end;

procedure TProveedoresDataTableRules.SetIGNORAR_CONTABILIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresIGNORAR_CONTABILIDAD].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetTIENE_SUBCUENTAValue: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresTIENE_SUBCUENTA].AsInteger;
end;

procedure TProveedoresDataTableRules.SetTIENE_SUBCUENTAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresTIENE_SUBCUENTA].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetTIENE_SUBCUENTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresTIENE_SUBCUENTA].IsNull;
end;

procedure TProveedoresDataTableRules.SetTIENE_SUBCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresTIENE_SUBCUENTA].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetNOMBRE_COMERCIALValue: String;
begin
  result := DataTable.Fields[idx_ProveedoresNOMBRE_COMERCIAL].AsString;
end;

procedure TProveedoresDataTableRules.SetNOMBRE_COMERCIALValue(const aValue: String);
begin
  DataTable.Fields[idx_ProveedoresNOMBRE_COMERCIAL].AsString := aValue;
end;

function TProveedoresDataTableRules.GetNOMBRE_COMERCIALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresNOMBRE_COMERCIAL].IsNull;
end;

procedure TProveedoresDataTableRules.SetNOMBRE_COMERCIALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresNOMBRE_COMERCIAL].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetES_ACREEDORValue: SmallInt;
begin
  result := DataTable.Fields[idx_ProveedoresES_ACREEDOR].AsSmallInt;
end;

procedure TProveedoresDataTableRules.SetES_ACREEDORValue(const aValue: SmallInt);
begin
  DataTable.Fields[idx_ProveedoresES_ACREEDOR].AsSmallInt := aValue;
end;

function TProveedoresDataTableRules.GetES_ACREEDORIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresES_ACREEDOR].IsNull;
end;

procedure TProveedoresDataTableRules.SetES_ACREEDORIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresES_ACREEDOR].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_1Value: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_1].AsInteger;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_1Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_1].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_1].IsNull;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_1].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_2Value: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_2].AsInteger;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_2Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_2].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_2].IsNull;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_2].AsVariant := Null;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_3Value: Integer;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_3].AsInteger;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer);
begin
  DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_3].AsInteger := aValue;
end;

function TProveedoresDataTableRules.GetVENCIMIENTO_FACTURAS_3IsNull: boolean;
begin
  result := DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_3].IsNull;
end;

procedure TProveedoresDataTableRules.SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ProveedoresVENCIMIENTO_FACTURAS_3].AsVariant := Null;
end;


{ TComercialesDataTableRules }
constructor TComercialesDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TComercialesDataTableRules.Destroy;
begin
  inherited;
end;

procedure TComercialesDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_ComercialesNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TComercialesDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ComercialesID].AsInteger;
end;

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

function TComercialesDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesID].IsNull;
end;

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

function TComercialesDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_ComercialesID_CATEGORIA].AsInteger;
end;

procedure TComercialesDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ComercialesID_CATEGORIA].AsInteger := aValue;
end;

function TComercialesDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesID_CATEGORIA].IsNull;
end;

procedure TComercialesDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesID_CATEGORIA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_ComercialesNIF_CIF].AsString;
end;

procedure TComercialesDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesNIF_CIF].AsString := aValue;
end;

function TComercialesDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesNIF_CIF].IsNull;
end;

procedure TComercialesDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesNIF_CIF].AsVariant := Null;
end;

function TComercialesDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ComercialesNOMBRE].AsString;
end;

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

function TComercialesDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesNOMBRE].IsNull;
end;

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

function TComercialesDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_ComercialesPERSONA_CONTACTO].AsString;
end;

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

function TComercialesDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesPERSONA_CONTACTO].IsNull;
end;

procedure TComercialesDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesPERSONA_CONTACTO].AsVariant := Null;
end;

function TComercialesDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_ComercialesCALLE].AsString;
end;

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

function TComercialesDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesCALLE].IsNull;
end;

procedure TComercialesDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesCALLE].AsVariant := Null;
end;

function TComercialesDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_ComercialesPOBLACION].AsString;
end;

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

function TComercialesDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesPOBLACION].IsNull;
end;

procedure TComercialesDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesPOBLACION].AsVariant := Null;
end;

function TComercialesDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_ComercialesPROVINCIA].AsString;
end;

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

function TComercialesDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesPROVINCIA].IsNull;
end;

procedure TComercialesDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesPROVINCIA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_ComercialesCODIGO_POSTAL].AsString;
end;

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

function TComercialesDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesCODIGO_POSTAL].IsNull;
end;

procedure TComercialesDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesCODIGO_POSTAL].AsVariant := Null;
end;

function TComercialesDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_ComercialesPAIS].AsString;
end;

procedure TComercialesDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesPAIS].AsString := aValue;
end;

function TComercialesDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesPAIS].IsNull;
end;

procedure TComercialesDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesPAIS].AsVariant := Null;
end;

function TComercialesDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_ComercialesIDIOMA_ISO].AsString;
end;

procedure TComercialesDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesIDIOMA_ISO].AsString := aValue;
end;

function TComercialesDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesIDIOMA_ISO].IsNull;
end;

procedure TComercialesDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesIDIOMA_ISO].AsVariant := Null;
end;

function TComercialesDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_ComercialesIDIOMA].AsString;
end;

procedure TComercialesDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesIDIOMA].AsString := aValue;
end;

function TComercialesDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesIDIOMA].IsNull;
end;

procedure TComercialesDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesIDIOMA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_ComercialesTELEFONO_1].AsString;
end;

procedure TComercialesDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesTELEFONO_1].AsString := aValue;
end;

function TComercialesDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesTELEFONO_1].IsNull;
end;

procedure TComercialesDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesTELEFONO_1].AsVariant := Null;
end;

function TComercialesDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_ComercialesTELEFONO_2].AsString;
end;

procedure TComercialesDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesTELEFONO_2].AsString := aValue;
end;

function TComercialesDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesTELEFONO_2].IsNull;
end;

procedure TComercialesDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesTELEFONO_2].AsVariant := Null;
end;

function TComercialesDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_ComercialesMOVIL_1].AsString;
end;

procedure TComercialesDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesMOVIL_1].AsString := aValue;
end;

function TComercialesDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesMOVIL_1].IsNull;
end;

procedure TComercialesDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesMOVIL_1].AsVariant := Null;
end;

function TComercialesDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_ComercialesMOVIL_2].AsString;
end;

procedure TComercialesDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesMOVIL_2].AsString := aValue;
end;

function TComercialesDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesMOVIL_2].IsNull;
end;

procedure TComercialesDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesMOVIL_2].AsVariant := Null;
end;

function TComercialesDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_ComercialesFAX].AsString;
end;

procedure TComercialesDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesFAX].AsString := aValue;
end;

function TComercialesDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesFAX].IsNull;
end;

procedure TComercialesDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesFAX].AsVariant := Null;
end;

function TComercialesDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_ComercialesEMAIL_1].AsString;
end;

procedure TComercialesDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesEMAIL_1].AsString := aValue;
end;

function TComercialesDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesEMAIL_1].IsNull;
end;

procedure TComercialesDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesEMAIL_1].AsVariant := Null;
end;

function TComercialesDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_ComercialesEMAIL_2].AsString;
end;

procedure TComercialesDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesEMAIL_2].AsString := aValue;
end;

function TComercialesDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesEMAIL_2].IsNull;
end;

procedure TComercialesDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesEMAIL_2].AsVariant := Null;
end;

function TComercialesDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_ComercialesPAGINA_WEB].AsString;
end;

procedure TComercialesDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesPAGINA_WEB].AsString := aValue;
end;

function TComercialesDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesPAGINA_WEB].IsNull;
end;

procedure TComercialesDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesPAGINA_WEB].AsVariant := Null;
end;

function TComercialesDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_ComercialesNOTAS].AsString;
end;

function TComercialesDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesNOTAS].IsNull;
end;

procedure TComercialesDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesNOTAS].AsVariant := Null;
end;

function TComercialesDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_ALTA].AsDateTime;
end;

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

function TComercialesDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_ALTA].IsNull;
end;

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

function TComercialesDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_MODIFICACION].AsDateTime;
end;

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

function TComercialesDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_MODIFICACION].IsNull;
end;

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

function TComercialesDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_ComercialesUSUARIO].AsString;
end;

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

function TComercialesDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesUSUARIO].IsNull;
end;

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

function TComercialesDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_ComercialesID_EMPRESA].AsInteger;
end;

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

function TComercialesDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesID_EMPRESA].IsNull;
end;

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

function TComercialesDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_ComercialesREFERENCIA].AsString;
end;

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

function TComercialesDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesREFERENCIA].IsNull;
end;

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

function TComercialesDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_ComercialesID_TIENDA].AsInteger;
end;

procedure TComercialesDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ComercialesID_TIENDA].AsInteger := aValue;
end;

function TComercialesDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesID_TIENDA].IsNull;
end;

procedure TComercialesDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesID_TIENDA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_ComercialesTIENDA].AsString;
end;

procedure TComercialesDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesTIENDA].AsString := aValue;
end;

function TComercialesDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesTIENDA].IsNull;
end;

procedure TComercialesDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesTIENDA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetCOMISIONValue: Float;
begin
  result := DataTable.Fields[idx_ComercialesCOMISION].AsFloat;
end;

procedure TComercialesDataTableRules.SetCOMISIONValue(const aValue: Float);
begin
  DataTable.Fields[idx_ComercialesCOMISION].AsFloat := aValue;
end;

function TComercialesDataTableRules.GetCOMISIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesCOMISION].IsNull;
end;

procedure TComercialesDataTableRules.SetCOMISIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesCOMISION].AsVariant := Null;
end;

function TComercialesDataTableRules.GetDELEGACIONValue: String;
begin
  result := DataTable.Fields[idx_ComercialesDELEGACION].AsString;
end;

procedure TComercialesDataTableRules.SetDELEGACIONValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesDELEGACION].AsString := aValue;
end;

function TComercialesDataTableRules.GetDELEGACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesDELEGACION].IsNull;
end;

procedure TComercialesDataTableRules.SetDELEGACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesDELEGACION].AsVariant := Null;
end;

function TComercialesDataTableRules.GetFECHA_ALTA_EMPRESAValue: DateTime;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_ALTA_EMPRESA].AsDateTime;
end;

procedure TComercialesDataTableRules.SetFECHA_ALTA_EMPRESAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_ComercialesFECHA_ALTA_EMPRESA].AsDateTime := aValue;
end;

function TComercialesDataTableRules.GetFECHA_ALTA_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_ALTA_EMPRESA].IsNull;
end;

procedure TComercialesDataTableRules.SetFECHA_ALTA_EMPRESAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesFECHA_ALTA_EMPRESA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetFECHA_BAJAValue: DateTime;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_BAJA].AsDateTime;
end;

procedure TComercialesDataTableRules.SetFECHA_BAJAValue(const aValue: DateTime);
begin
  DataTable.Fields[idx_ComercialesFECHA_BAJA].AsDateTime := aValue;
end;

function TComercialesDataTableRules.GetFECHA_BAJAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesFECHA_BAJA].IsNull;
end;

procedure TComercialesDataTableRules.SetFECHA_BAJAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesFECHA_BAJA].AsVariant := Null;
end;

function TComercialesDataTableRules.GetCAUSA_BAJAValue: String;
begin
  result := DataTable.Fields[idx_ComercialesCAUSA_BAJA].AsString;
end;

procedure TComercialesDataTableRules.SetCAUSA_BAJAValue(const aValue: String);
begin
  DataTable.Fields[idx_ComercialesCAUSA_BAJA].AsString := aValue;
end;

function TComercialesDataTableRules.GetCAUSA_BAJAIsNull: boolean;
begin
  result := DataTable.Fields[idx_ComercialesCAUSA_BAJA].IsNull;
end;

procedure TComercialesDataTableRules.SetCAUSA_BAJAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ComercialesCAUSA_BAJA].AsVariant := Null;
end;


{ TInstaladoresDataTableRules }
constructor TInstaladoresDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TInstaladoresDataTableRules.Destroy;
begin
  inherited;
end;

procedure TInstaladoresDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_InstaladoresNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TInstaladoresDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_InstaladoresID].AsInteger;
end;

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

function TInstaladoresDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresID].IsNull;
end;

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

function TInstaladoresDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_InstaladoresID_CATEGORIA].AsInteger;
end;

procedure TInstaladoresDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InstaladoresID_CATEGORIA].AsInteger := aValue;
end;

function TInstaladoresDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresID_CATEGORIA].IsNull;
end;

procedure TInstaladoresDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresID_CATEGORIA].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresNIF_CIF].AsString;
end;

procedure TInstaladoresDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresNIF_CIF].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresNIF_CIF].IsNull;
end;

procedure TInstaladoresDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresNIF_CIF].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresNOMBRE].AsString;
end;

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

function TInstaladoresDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresNOMBRE].IsNull;
end;

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

function TInstaladoresDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresPERSONA_CONTACTO].AsString;
end;

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

function TInstaladoresDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresPERSONA_CONTACTO].IsNull;
end;

procedure TInstaladoresDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresPERSONA_CONTACTO].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresCALLE].AsString;
end;

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

function TInstaladoresDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresCALLE].IsNull;
end;

procedure TInstaladoresDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresCALLE].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresPOBLACION].AsString;
end;

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

function TInstaladoresDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresPOBLACION].IsNull;
end;

procedure TInstaladoresDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresPOBLACION].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresPROVINCIA].AsString;
end;

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

function TInstaladoresDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresPROVINCIA].IsNull;
end;

procedure TInstaladoresDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresPROVINCIA].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresCODIGO_POSTAL].AsString;
end;

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

function TInstaladoresDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresCODIGO_POSTAL].IsNull;
end;

procedure TInstaladoresDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresCODIGO_POSTAL].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresPAIS].AsString;
end;

procedure TInstaladoresDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresPAIS].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresPAIS].IsNull;
end;

procedure TInstaladoresDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresPAIS].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresIDIOMA_ISO].AsString;
end;

procedure TInstaladoresDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresIDIOMA_ISO].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresIDIOMA_ISO].IsNull;
end;

procedure TInstaladoresDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresIDIOMA_ISO].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresIDIOMA].AsString;
end;

procedure TInstaladoresDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresIDIOMA].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresIDIOMA].IsNull;
end;

procedure TInstaladoresDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresIDIOMA].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresTELEFONO_1].AsString;
end;

procedure TInstaladoresDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresTELEFONO_1].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresTELEFONO_1].IsNull;
end;

procedure TInstaladoresDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresTELEFONO_1].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresTELEFONO_2].AsString;
end;

procedure TInstaladoresDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresTELEFONO_2].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresTELEFONO_2].IsNull;
end;

procedure TInstaladoresDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresTELEFONO_2].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresMOVIL_1].AsString;
end;

procedure TInstaladoresDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresMOVIL_1].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresMOVIL_1].IsNull;
end;

procedure TInstaladoresDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresMOVIL_1].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresMOVIL_2].AsString;
end;

procedure TInstaladoresDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresMOVIL_2].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresMOVIL_2].IsNull;
end;

procedure TInstaladoresDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresMOVIL_2].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresFAX].AsString;
end;

procedure TInstaladoresDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresFAX].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresFAX].IsNull;
end;

procedure TInstaladoresDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresFAX].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresEMAIL_1].AsString;
end;

procedure TInstaladoresDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresEMAIL_1].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresEMAIL_1].IsNull;
end;

procedure TInstaladoresDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresEMAIL_1].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_InstaladoresEMAIL_2].AsString;
end;

procedure TInstaladoresDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresEMAIL_2].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresEMAIL_2].IsNull;
end;

procedure TInstaladoresDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresEMAIL_2].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresPAGINA_WEB].AsString;
end;

procedure TInstaladoresDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresPAGINA_WEB].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresPAGINA_WEB].IsNull;
end;

procedure TInstaladoresDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresPAGINA_WEB].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_InstaladoresNOTAS].AsString;
end;

function TInstaladoresDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresNOTAS].IsNull;
end;

procedure TInstaladoresDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresNOTAS].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_InstaladoresFECHA_ALTA].AsDateTime;
end;

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

function TInstaladoresDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresFECHA_ALTA].IsNull;
end;

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

function TInstaladoresDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_InstaladoresFECHA_MODIFICACION].AsDateTime;
end;

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

function TInstaladoresDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresFECHA_MODIFICACION].IsNull;
end;

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

function TInstaladoresDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresUSUARIO].AsString;
end;

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

function TInstaladoresDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresUSUARIO].IsNull;
end;

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

function TInstaladoresDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_InstaladoresID_EMPRESA].AsInteger;
end;

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

function TInstaladoresDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresID_EMPRESA].IsNull;
end;

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

function TInstaladoresDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresREFERENCIA].AsString;
end;

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

function TInstaladoresDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresREFERENCIA].IsNull;
end;

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

function TInstaladoresDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_InstaladoresID_TIENDA].AsInteger;
end;

procedure TInstaladoresDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_InstaladoresID_TIENDA].AsInteger := aValue;
end;

function TInstaladoresDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresID_TIENDA].IsNull;
end;

procedure TInstaladoresDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresID_TIENDA].AsVariant := Null;
end;

function TInstaladoresDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_InstaladoresTIENDA].AsString;
end;

procedure TInstaladoresDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_InstaladoresTIENDA].AsString := aValue;
end;

function TInstaladoresDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_InstaladoresTIENDA].IsNull;
end;

procedure TInstaladoresDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_InstaladoresTIENDA].AsVariant := Null;
end;


{ TVendedoresDataTableRules }
constructor TVendedoresDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TVendedoresDataTableRules.Destroy;
begin
  inherited;
end;

procedure TVendedoresDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_VendedoresNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TVendedoresDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_VendedoresID].AsInteger;
end;

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

function TVendedoresDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresID].IsNull;
end;

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

function TVendedoresDataTableRules.GetID_CATEGORIAValue: Integer;
begin
  result := DataTable.Fields[idx_VendedoresID_CATEGORIA].AsInteger;
end;

procedure TVendedoresDataTableRules.SetID_CATEGORIAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_VendedoresID_CATEGORIA].AsInteger := aValue;
end;

function TVendedoresDataTableRules.GetID_CATEGORIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresID_CATEGORIA].IsNull;
end;

procedure TVendedoresDataTableRules.SetID_CATEGORIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresID_CATEGORIA].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_VendedoresNIF_CIF].AsString;
end;

procedure TVendedoresDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresNIF_CIF].AsString := aValue;
end;

function TVendedoresDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresNIF_CIF].IsNull;
end;

procedure TVendedoresDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresNIF_CIF].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_VendedoresNOMBRE].AsString;
end;

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

function TVendedoresDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresNOMBRE].IsNull;
end;

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

function TVendedoresDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_VendedoresPERSONA_CONTACTO].AsString;
end;

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

function TVendedoresDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresPERSONA_CONTACTO].IsNull;
end;

procedure TVendedoresDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresPERSONA_CONTACTO].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_VendedoresCALLE].AsString;
end;

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

function TVendedoresDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresCALLE].IsNull;
end;

procedure TVendedoresDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresCALLE].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_VendedoresPOBLACION].AsString;
end;

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

function TVendedoresDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresPOBLACION].IsNull;
end;

procedure TVendedoresDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresPOBLACION].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_VendedoresPROVINCIA].AsString;
end;

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

function TVendedoresDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresPROVINCIA].IsNull;
end;

procedure TVendedoresDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresPROVINCIA].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_VendedoresCODIGO_POSTAL].AsString;
end;

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

function TVendedoresDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresCODIGO_POSTAL].IsNull;
end;

procedure TVendedoresDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresCODIGO_POSTAL].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_VendedoresPAIS].AsString;
end;

procedure TVendedoresDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresPAIS].AsString := aValue;
end;

function TVendedoresDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresPAIS].IsNull;
end;

procedure TVendedoresDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresPAIS].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetIDIOMA_ISOValue: String;
begin
  result := DataTable.Fields[idx_VendedoresIDIOMA_ISO].AsString;
end;

procedure TVendedoresDataTableRules.SetIDIOMA_ISOValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresIDIOMA_ISO].AsString := aValue;
end;

function TVendedoresDataTableRules.GetIDIOMA_ISOIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresIDIOMA_ISO].IsNull;
end;

procedure TVendedoresDataTableRules.SetIDIOMA_ISOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresIDIOMA_ISO].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetIDIOMAValue: String;
begin
  result := DataTable.Fields[idx_VendedoresIDIOMA].AsString;
end;

procedure TVendedoresDataTableRules.SetIDIOMAValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresIDIOMA].AsString := aValue;
end;

function TVendedoresDataTableRules.GetIDIOMAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresIDIOMA].IsNull;
end;

procedure TVendedoresDataTableRules.SetIDIOMAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresIDIOMA].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_VendedoresTELEFONO_1].AsString;
end;

procedure TVendedoresDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresTELEFONO_1].AsString := aValue;
end;

function TVendedoresDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresTELEFONO_1].IsNull;
end;

procedure TVendedoresDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresTELEFONO_1].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_VendedoresTELEFONO_2].AsString;
end;

procedure TVendedoresDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresTELEFONO_2].AsString := aValue;
end;

function TVendedoresDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresTELEFONO_2].IsNull;
end;

procedure TVendedoresDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresTELEFONO_2].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_VendedoresMOVIL_1].AsString;
end;

procedure TVendedoresDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresMOVIL_1].AsString := aValue;
end;

function TVendedoresDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresMOVIL_1].IsNull;
end;

procedure TVendedoresDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresMOVIL_1].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_VendedoresMOVIL_2].AsString;
end;

procedure TVendedoresDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresMOVIL_2].AsString := aValue;
end;

function TVendedoresDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresMOVIL_2].IsNull;
end;

procedure TVendedoresDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresMOVIL_2].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_VendedoresFAX].AsString;
end;

procedure TVendedoresDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresFAX].AsString := aValue;
end;

function TVendedoresDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresFAX].IsNull;
end;

procedure TVendedoresDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresFAX].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_VendedoresEMAIL_1].AsString;
end;

procedure TVendedoresDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresEMAIL_1].AsString := aValue;
end;

function TVendedoresDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresEMAIL_1].IsNull;
end;

procedure TVendedoresDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresEMAIL_1].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_VendedoresEMAIL_2].AsString;
end;

procedure TVendedoresDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresEMAIL_2].AsString := aValue;
end;

function TVendedoresDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresEMAIL_2].IsNull;
end;

procedure TVendedoresDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresEMAIL_2].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_VendedoresPAGINA_WEB].AsString;
end;

procedure TVendedoresDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresPAGINA_WEB].AsString := aValue;
end;

function TVendedoresDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresPAGINA_WEB].IsNull;
end;

procedure TVendedoresDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresPAGINA_WEB].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_VendedoresNOTAS].AsString;
end;

function TVendedoresDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresNOTAS].IsNull;
end;

procedure TVendedoresDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresNOTAS].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_VendedoresFECHA_ALTA].AsDateTime;
end;

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

function TVendedoresDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresFECHA_ALTA].IsNull;
end;

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

function TVendedoresDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_VendedoresFECHA_MODIFICACION].AsDateTime;
end;

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

function TVendedoresDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresFECHA_MODIFICACION].IsNull;
end;

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

function TVendedoresDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_VendedoresUSUARIO].AsString;
end;

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

function TVendedoresDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresUSUARIO].IsNull;
end;

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

function TVendedoresDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_VendedoresID_EMPRESA].AsInteger;
end;

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

function TVendedoresDataTableRules.GetID_EMPRESAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresID_EMPRESA].IsNull;
end;

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

function TVendedoresDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_VendedoresREFERENCIA].AsString;
end;

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

function TVendedoresDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresREFERENCIA].IsNull;
end;

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

function TVendedoresDataTableRules.GetID_TIENDAValue: Integer;
begin
  result := DataTable.Fields[idx_VendedoresID_TIENDA].AsInteger;
end;

procedure TVendedoresDataTableRules.SetID_TIENDAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_VendedoresID_TIENDA].AsInteger := aValue;
end;

function TVendedoresDataTableRules.GetID_TIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresID_TIENDA].IsNull;
end;

procedure TVendedoresDataTableRules.SetID_TIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresID_TIENDA].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetTIENDAValue: String;
begin
  result := DataTable.Fields[idx_VendedoresTIENDA].AsString;
end;

procedure TVendedoresDataTableRules.SetTIENDAValue(const aValue: String);
begin
  DataTable.Fields[idx_VendedoresTIENDA].AsString := aValue;
end;

function TVendedoresDataTableRules.GetTIENDAIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresTIENDA].IsNull;
end;

procedure TVendedoresDataTableRules.SetTIENDAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresTIENDA].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetCOMISIONValue: Float;
begin
  result := DataTable.Fields[idx_VendedoresCOMISION].AsFloat;
end;

procedure TVendedoresDataTableRules.SetCOMISIONValue(const aValue: Float);
begin
  DataTable.Fields[idx_VendedoresCOMISION].AsFloat := aValue;
end;

function TVendedoresDataTableRules.GetCOMISIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresCOMISION].IsNull;
end;

procedure TVendedoresDataTableRules.SetCOMISIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresCOMISION].AsVariant := Null;
end;

function TVendedoresDataTableRules.GetID_USUARIOValue: Integer;
begin
  result := DataTable.Fields[idx_VendedoresID_USUARIO].AsInteger;
end;

procedure TVendedoresDataTableRules.SetID_USUARIOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_VendedoresID_USUARIO].AsInteger := aValue;
end;

function TVendedoresDataTableRules.GetID_USUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_VendedoresID_USUARIO].IsNull;
end;

procedure TVendedoresDataTableRules.SetID_USUARIOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_VendedoresID_USUARIO].AsVariant := Null;
end;


{ TDireccionesContactoDataTableRules }
constructor TDireccionesContactoDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TDireccionesContactoDataTableRules.Destroy;
begin
  inherited;
end;

procedure TDireccionesContactoDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_DireccionesContactoNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TDireccionesContactoDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_DireccionesContactoID].AsInteger;
end;

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

function TDireccionesContactoDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoID].IsNull;
end;

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

function TDireccionesContactoDataTableRules.GetID_CONTACTOValue: Integer;
begin
  result := DataTable.Fields[idx_DireccionesContactoID_CONTACTO].AsInteger;
end;

procedure TDireccionesContactoDataTableRules.SetID_CONTACTOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_DireccionesContactoID_CONTACTO].AsInteger := aValue;
end;

function TDireccionesContactoDataTableRules.GetID_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoID_CONTACTO].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetID_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoID_CONTACTO].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoNIF_CIF].AsString;
end;

procedure TDireccionesContactoDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_DireccionesContactoNIF_CIF].AsString := aValue;
end;

function TDireccionesContactoDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoNIF_CIF].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoNIF_CIF].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoCALLE].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoCALLE].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoCALLE].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoPOBLACION].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoPOBLACION].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoPOBLACION].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoPROVINCIA].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoPROVINCIA].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoPROVINCIA].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoCODIGO_POSTAL].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoCODIGO_POSTAL].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoCODIGO_POSTAL].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoPERSONA_CONTACTO].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoPERSONA_CONTACTO].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoPERSONA_CONTACTO].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoNOMBRE].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoNOMBRE].IsNull;
end;

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

function TDireccionesContactoDataTableRules.GetTELEFONOValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoTELEFONO].AsString;
end;

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

function TDireccionesContactoDataTableRules.GetTELEFONOIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoTELEFONO].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetTELEFONOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoTELEFONO].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetMOVILValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoMOVIL].AsString;
end;

procedure TDireccionesContactoDataTableRules.SetMOVILValue(const aValue: String);
begin
  DataTable.Fields[idx_DireccionesContactoMOVIL].AsString := aValue;
end;

function TDireccionesContactoDataTableRules.GetMOVILIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoMOVIL].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetMOVILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoMOVIL].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoFAX].AsString;
end;

procedure TDireccionesContactoDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_DireccionesContactoFAX].AsString := aValue;
end;

function TDireccionesContactoDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoFAX].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoFAX].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetEMAILValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoEMAIL].AsString;
end;

procedure TDireccionesContactoDataTableRules.SetEMAILValue(const aValue: String);
begin
  DataTable.Fields[idx_DireccionesContactoEMAIL].AsString := aValue;
end;

function TDireccionesContactoDataTableRules.GetEMAILIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoEMAIL].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetEMAILIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoEMAIL].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_DireccionesContactoNOTAS].AsString;
end;

function TDireccionesContactoDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoNOTAS].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoNOTAS].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetPORTEValue: Float;
begin
  result := DataTable.Fields[idx_DireccionesContactoPORTE].AsFloat;
end;

procedure TDireccionesContactoDataTableRules.SetPORTEValue(const aValue: Float);
begin
  DataTable.Fields[idx_DireccionesContactoPORTE].AsFloat := aValue;
end;

function TDireccionesContactoDataTableRules.GetPORTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoPORTE].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetPORTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoPORTE].AsVariant := Null;
end;

function TDireccionesContactoDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_DireccionesContactoFECHA_ALTA].AsDateTime;
end;

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

function TDireccionesContactoDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoFECHA_ALTA].IsNull;
end;

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

function TDireccionesContactoDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_DireccionesContactoFECHA_MODIFICACION].AsDateTime;
end;

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

function TDireccionesContactoDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoFECHA_MODIFICACION].IsNull;
end;

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

function TDireccionesContactoDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_DireccionesContactoPAIS].AsString;
end;

procedure TDireccionesContactoDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_DireccionesContactoPAIS].AsString := aValue;
end;

function TDireccionesContactoDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_DireccionesContactoPAIS].IsNull;
end;

procedure TDireccionesContactoDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_DireccionesContactoPAIS].AsVariant := Null;
end;


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

destructor TClientesDescuentosDataTableRules.Destroy;
begin
  inherited;
end;

function TClientesDescuentosDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID].AsInteger;
end;

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

function TClientesDescuentosDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID].IsNull;
end;

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

function TClientesDescuentosDataTableRules.GetID_CLIENTEValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID_CLIENTE].AsInteger;
end;

procedure TClientesDescuentosDataTableRules.SetID_CLIENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_ClientesDescuentosID_CLIENTE].AsInteger := aValue;
end;

function TClientesDescuentosDataTableRules.GetID_CLIENTEIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID_CLIENTE].IsNull;
end;

procedure TClientesDescuentosDataTableRules.SetID_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDescuentosID_CLIENTE].AsVariant := Null;
end;

function TClientesDescuentosDataTableRules.GetID_PROVEEDORValue: Integer;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID_PROVEEDOR].AsInteger;
end;

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

function TClientesDescuentosDataTableRules.GetID_PROVEEDORIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDescuentosID_PROVEEDOR].IsNull;
end;

procedure TClientesDescuentosDataTableRules.SetID_PROVEEDORIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDescuentosID_PROVEEDOR].AsVariant := Null;
end;

function TClientesDescuentosDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_ClientesDescuentosNOMBRE].AsString;
end;

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

function TClientesDescuentosDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDescuentosNOMBRE].IsNull;
end;

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

function TClientesDescuentosDataTableRules.GetDESCUENTOValue: Float;
begin
  result := DataTable.Fields[idx_ClientesDescuentosDESCUENTO].AsFloat;
end;

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

function TClientesDescuentosDataTableRules.GetDESCUENTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_ClientesDescuentosDESCUENTO].IsNull;
end;

procedure TClientesDescuentosDataTableRules.SetDESCUENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_ClientesDescuentosDESCUENTO].AsVariant := Null;
end;


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

destructor TProcedenciasClienteDataTableRules.Destroy;
begin
  inherited;
end;

function TProcedenciasClienteDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_ProcedenciasClienteID].AsInteger;
end;

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

function TProcedenciasClienteDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProcedenciasClienteID].IsNull;
end;

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

function TProcedenciasClienteDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_ProcedenciasClienteDESCRIPCION].AsString;
end;

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

function TProcedenciasClienteDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_ProcedenciasClienteDESCRIPCION].IsNull;
end;

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


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

destructor TGruposProveedorDataTableRules.Destroy;
begin
  inherited;
end;

function TGruposProveedorDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_GruposProveedorID].AsInteger;
end;

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

function TGruposProveedorDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_GruposProveedorID].IsNull;
end;

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

function TGruposProveedorDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_GruposProveedorDESCRIPCION].AsString;
end;

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

function TGruposProveedorDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_GruposProveedorDESCRIPCION].IsNull;
end;

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


{ TContactos_RefreshDataTableRules }
constructor TContactos_RefreshDataTableRules.Create(aDataTable: TDADataTable);
var
  StrList: TStringList;
begin
  inherited;

  StrList := TStringList.Create;
  StrList.OnChange := NOTAS_OnChange;
  f_NOTAS := NewROStrings(StrList,True);
end;

destructor TContactos_RefreshDataTableRules.Destroy;
begin
  inherited;
end;

procedure TContactos_RefreshDataTableRules.NOTAS_OnChange(Sender: TObject);
begin
  if DataTable.Editing then DataTable.Fields[idx_Contactos_RefreshNOTAS].AsVariant := TStringList(Sender).Text;
end;

function TContactos_RefreshDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_Contactos_RefreshID].AsInteger;
end;

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

function TContactos_RefreshDataTableRules.GetIDIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshID].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetNIF_CIFValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshNIF_CIF].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetNIF_CIFValue(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshNIF_CIF].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetNIF_CIFIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshNIF_CIF].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetNIF_CIFIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshNIF_CIF].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetNOMBREValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshNOMBRE].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetNOMBREIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshNOMBRE].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetCALLEValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshCALLE].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetCALLEIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshCALLE].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetCALLEIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshCALLE].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetPOBLACIONValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPOBLACION].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetPOBLACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPOBLACION].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetPOBLACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshPOBLACION].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetPROVINCIAValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPROVINCIA].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetPROVINCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPROVINCIA].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetPROVINCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshPROVINCIA].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetCODIGO_POSTALValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshCODIGO_POSTAL].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetCODIGO_POSTALIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshCODIGO_POSTAL].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetCODIGO_POSTALIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshCODIGO_POSTAL].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetPAISValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPAIS].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetPAISValue(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshPAIS].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetPAISIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPAIS].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetPAISIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshPAIS].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetTELEFONO_1Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshTELEFONO_1].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetTELEFONO_1Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshTELEFONO_1].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetTELEFONO_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshTELEFONO_1].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetTELEFONO_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshTELEFONO_1].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetTELEFONO_2Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshTELEFONO_2].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetTELEFONO_2Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshTELEFONO_2].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetTELEFONO_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshTELEFONO_2].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetTELEFONO_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshTELEFONO_2].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetMOVIL_1Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshMOVIL_1].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetMOVIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshMOVIL_1].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetMOVIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshMOVIL_1].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetMOVIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshMOVIL_1].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetMOVIL_2Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshMOVIL_2].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetMOVIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshMOVIL_2].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetMOVIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshMOVIL_2].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetMOVIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshMOVIL_2].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetFAXValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFAX].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetFAXValue(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshFAX].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetFAXIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFAX].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetFAXIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshFAX].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetEMAIL_1Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshEMAIL_1].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetEMAIL_1Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshEMAIL_1].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetEMAIL_1IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshEMAIL_1].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetEMAIL_1IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshEMAIL_1].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetEMAIL_2Value: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshEMAIL_2].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetEMAIL_2Value(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshEMAIL_2].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetEMAIL_2IsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshEMAIL_2].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetEMAIL_2IsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshEMAIL_2].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetPAGINA_WEBValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPAGINA_WEB].AsString;
end;

procedure TContactos_RefreshDataTableRules.SetPAGINA_WEBValue(const aValue: String);
begin
  DataTable.Fields[idx_Contactos_RefreshPAGINA_WEB].AsString := aValue;
end;

function TContactos_RefreshDataTableRules.GetPAGINA_WEBIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPAGINA_WEB].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetPAGINA_WEBIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshPAGINA_WEB].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetNOTASValue: IROStrings;
begin
  result := f_NOTAS;
  result.Text := DataTable.Fields[idx_Contactos_RefreshNOTAS].AsString;
end;

function TContactos_RefreshDataTableRules.GetNOTASIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshNOTAS].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetNOTASIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshNOTAS].AsVariant := Null;
end;

function TContactos_RefreshDataTableRules.GetFECHA_ALTAValue: DateTime;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFECHA_ALTA].AsDateTime;
end;

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

function TContactos_RefreshDataTableRules.GetFECHA_ALTAIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFECHA_ALTA].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFECHA_MODIFICACION].AsDateTime;
end;

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

function TContactos_RefreshDataTableRules.GetFECHA_MODIFICACIONIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshFECHA_MODIFICACION].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetUSUARIOValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshUSUARIO].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetUSUARIOIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshUSUARIO].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetREFERENCIAValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshREFERENCIA].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetREFERENCIAIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshREFERENCIA].IsNull;
end;

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

function TContactos_RefreshDataTableRules.GetPERSONA_CONTACTOValue: String;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPERSONA_CONTACTO].AsString;
end;

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

function TContactos_RefreshDataTableRules.GetPERSONA_CONTACTOIsNull: boolean;
begin
  result := DataTable.Fields[idx_Contactos_RefreshPERSONA_CONTACTO].IsNull;
end;

procedure TContactos_RefreshDataTableRules.SetPERSONA_CONTACTOIsNull(const aValue: Boolean);
begin
  if aValue then
    DataTable.Fields[idx_Contactos_RefreshPERSONA_CONTACTO].AsVariant := Null;
end;


initialization
  RegisterDataTableRules(RID_DarEmpresasContacto, TDarEmpresasContactoDataTableRules);
  RegisterDataTableRules(RID_PersonalContacto, TPersonalContactoDataTableRules);
  RegisterDataTableRules(RID_DarTiendaDeUsuario, TDarTiendaDeUsuarioDataTableRules);
  RegisterDataTableRules(RID_SubCuentasContacto, TSubCuentasContactoDataTableRules);
  RegisterDataTableRules(RID_Contactos, TContactosDataTableRules);
  RegisterDataTableRules(RID_GruposCliente, TGruposClienteDataTableRules);
  RegisterDataTableRules(RID_DatosBancarios, TDatosBancariosDataTableRules);
  RegisterDataTableRules(RID_ContactosDirecciones, TContactosDireccionesDataTableRules);
  RegisterDataTableRules(RID_Clientes, TClientesDataTableRules);
  RegisterDataTableRules(RID_Proveedores, TProveedoresDataTableRules);
  RegisterDataTableRules(RID_Comerciales, TComercialesDataTableRules);
  RegisterDataTableRules(RID_Instaladores, TInstaladoresDataTableRules);
  RegisterDataTableRules(RID_Vendedores, TVendedoresDataTableRules);
  RegisterDataTableRules(RID_DireccionesContacto, TDireccionesContactoDataTableRules);
  RegisterDataTableRules(RID_ClientesDescuentos, TClientesDescuentosDataTableRules);
  RegisterDataTableRules(RID_ProcedenciasCliente, TProcedenciasClienteDataTableRules);
  RegisterDataTableRules(RID_GruposProveedor, TGruposProveedorDataTableRules);
  RegisterDataTableRules(RID_Contactos_Refresh, TContactos_RefreshDataTableRules);

end.