Tecsitel_FactuGES2/Source/ApplicationBase/Empresas/Data/uDataModuleEmpresas.dfm

inherited DataModuleEmpresas: TDataModuleEmpresas
  OnCreate = DAClientDataModuleCreate
  Height = 267
  Width = 402
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvEmpresas'
    Left = 48
    Top = 24
  end
  object rda_Empresas: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 176
    Top = 24
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 96
  end
  object tbl_Empresas: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_EMPRESAS_ID'
        LogChanges = False
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'Empresas_ID'
        InPrimaryKey = True
      end
      item
        Name = 'NIF_CIF'
        DataType = datString
        Size = 15
        DisplayLabel = 'CIF'
        DictionaryEntry = 'Empresas_NIF_CIF'
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Nombre'
        DictionaryEntry = 'Empresas_NOMBRE'
      end
      item
        Name = 'RAZON_SOCIAL'
        DataType = datString
        Size = 255
        DisplayLabel = 'Raz'#243'n Social'
        DictionaryEntry = 'Empresas_RAZON_SOCIAL'
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Calle'
        DictionaryEntry = 'Empresas_CALLE'
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Poblaci'#243'n'
        DictionaryEntry = 'Empresas_POBLACION'
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Provincia'
        DictionaryEntry = 'Empresas_PROVINCIA'
      end
      item
        Name = 'CODIGO_POSTAL'
        DataType = datString
        Size = 10
        DisplayLabel = 'C'#243'd. postal'
        DictionaryEntry = 'Empresas_CODIGO_POSTAL'
      end
      item
        Name = 'TELEFONO_1'
        DataType = datString
        Size = 25
        DisplayLabel = 'Tel'#233'fono 1'
        DictionaryEntry = 'Empresas_TELEFONO_1'
      end
      item
        Name = 'TELEFONO_2'
        DataType = datString
        Size = 25
        DisplayLabel = 'Tel'#233'fono 2'
        DictionaryEntry = 'Empresas_TELEFONO_2'
      end
      item
        Name = 'MOVIL_1'
        DataType = datString
        Size = 25
        DisplayLabel = 'M'#243'vil 1'
        DictionaryEntry = 'Empresas_MOVIL_1'
      end
      item
        Name = 'MOVIL_2'
        DataType = datString
        Size = 25
        DisplayLabel = 'M'#243'vil 2'
        DictionaryEntry = 'Empresas_MOVIL_2'
      end
      item
        Name = 'FAX'
        DataType = datString
        Size = 25
        DisplayLabel = 'Fax'
        DictionaryEntry = 'Empresas_FAX'
      end
      item
        Name = 'EMAIL_1'
        DataType = datString
        Size = 255
        DisplayLabel = 'E-mail 1'
        DictionaryEntry = 'Empresas_EMAIL_1'
      end
      item
        Name = 'EMAIL_2'
        DataType = datString
        Size = 255
        DisplayLabel = 'E-mail 2'
        DictionaryEntry = 'Empresas_EMAIL_2'
      end
      item
        Name = 'PAGINA_WEB'
        DataType = datString
        Size = 255
        DisplayLabel = 'P'#225'gina web'
        DictionaryEntry = 'Empresas_PAGINA_WEB'
      end
      item
        Name = 'NOTAS'
        DataType = datMemo
        DisplayLabel = 'Notas'
        DictionaryEntry = 'Empresas_NOTAS'
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
        DisplayLabel = 'Empresas_FECHA_ALTA'
        DictionaryEntry = 'Empresas_FECHA_ALTA'
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
        DisplayLabel = 'Empresas_FECHA_MODIFICACION'
        DictionaryEntry = 'Empresas_FECHA_MODIFICACION'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
        DisplayLabel = 'Empresas_USUARIO'
        DictionaryEntry = 'Empresas_USUARIO'
      end
      item
        Name = 'LOGOTIPO'
        DataType = datBlob
        BlobType = dabtBlob
        DisplayLabel = 'Logotipo'
        DictionaryEntry = 'Empresas_LOGOTIPO'
      end
      item
        Name = 'REGISTRO_MERCANTIL'
        DataType = datString
        Size = 255
        DisplayLabel = 'Registro mercantil'
        DictionaryEntry = 'Empresas_REGISTRO_MERCANTIL'
      end
      item
        Name = 'PARAM_TIEMPO'
        DataType = datFloat
        DictionaryEntry = 'Empresas_PARAM_TIEMPO'
      end
      item
        Name = 'PARAM_MARGEN'
        DataType = datFloat
        DictionaryEntry = 'Empresas_PARAM_MARGEN'
      end
      item
        Name = 'ID_TIPO_IVA'
        DataType = datSmallInt
        DisplayLabel = 'Empresas_ID_TIPO_IVA'
        DictionaryEntry = 'Empresas_ID_TIPO_IVA'
      end
      item
        Name = 'ID_FORMA_PAGO'
        DataType = datSmallInt
        DisplayLabel = 'Empresas_ID_FORMA_PAGO'
        DictionaryEntry = 'Empresas_ID_FORMA_PAGO'
      end
      item
        Name = 'ID_ALMACEN'
        DataType = datSmallInt
        DisplayLabel = 'Empresas_ID_ALMACEN'
        DictionaryEntry = 'Empresas_ID_ALMACEN'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Empresas
    LogicalName = 'Empresas'
    IndexDefs = <>
    Left = 176
    Top = 96
  end
  object ds_Empresas: TDADataSource
    DataSet = tbl_Empresas.Dataset
    DataTable = tbl_Empresas
    Left = 176
    Top = 168
  end
  object tbl_EmpresasDatosBanco: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_EMPRESAS_DATOS_BANCO_ID'
        LogChanges = False
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'EmpresasDatosBanco_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'EmpresasDatosBanco_ID_EMPRESA'
        DictionaryEntry = 'EmpresasDatosBanco_ID_EMPRESA'
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Nombre del banco'
        DictionaryEntry = 'EmpresasDatosBanco_NOMBRE'
      end
      item
        Name = 'ENTIDAD'
        DataType = datString
        Size = 15
        DisplayLabel = 'Entidad'
        DictionaryEntry = 'EmpresasDatosBanco_ENTIDAD'
      end
      item
        Name = 'SUCURSAL'
        DataType = datString
        Size = 15
        DisplayLabel = 'Sucursal'
        DictionaryEntry = 'EmpresasDatosBanco_SUCURSAL'
      end
      item
        Name = 'DC'
        DataType = datString
        Size = 15
        DictionaryEntry = 'EmpresasDatosBanco_DC'
      end
      item
        Name = 'CUENTA'
        DataType = datString
        Size = 15
        DisplayLabel = 'Cuenta'
        DictionaryEntry = 'EmpresasDatosBanco_CUENTA'
      end
      item
        Name = 'SUFIJO_N19'
        DataType = datString
        Size = 3
        DisplayLabel = 'Sufijo 19'
        DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N19'
      end
      item
        Name = 'SUFIJO_N58'
        DataType = datString
        Size = 3
        DisplayLabel = 'Sufijo 58'
        DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N58'
      end
      item
        Name = 'IBAN'
        DataType = datString
        Size = 255
      end
      item
        Name = 'SWIFT'
        DataType = datString
        Size = 255
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Empresas
    MasterSource = ds_Empresas
    MasterFields = 'ID'
    DetailFields = 'ID_EMPRESA'
    LogicalName = 'EmpresasDatosBanco'
    IndexDefs = <>
    Left = 288
    Top = 96
  end
  object ds_EmpresasDatosBanco: TDADataSource
    DataSet = tbl_EmpresasDatosBanco.Dataset
    DataTable = tbl_EmpresasDatosBanco
    Left = 288
    Top = 168
  end
end