object dmServer: TdmServer
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  OnDestroy = DataModuleDestroy
  Height = 307
  Width = 288
  object HTTPServer: TROIndyHTTPServer
    Encryption.UseCompression = True
    Dispatchers = <
      item
        Name = 'BINMessage'
        Message = BINMessage
        Enabled = True
        PathInfo = 'Bin'
      end>
    OnBeforeServerActivate = HTTPServerBeforeServerActivate
    IndyServer.Bindings = <>
    IndyServer.CommandHandlers = <>
    IndyServer.DefaultPort = 8099
    IndyServer.Greeting.NumericCode = 0
    IndyServer.MaxConnectionReply.NumericCode = 0
    IndyServer.ReplyExceptionCode = 0
    IndyServer.ReplyTexts = <>
    IndyServer.ReplyUnknownCommand.NumericCode = 0
    IndyServer.KeepAlive = True
    Port = 8099
    KeepAlive = True
    Left = 40
    Top = 16
  end
  object BINMessage: TROBinMessage
    Left = 136
    Top = 16
  end
  object IBXDriver: TDAIBXDriver
    Left = 224
    Top = 80
  end
  object DriverManager: TDADriverManager
    DriverDirectory = '%SYSTEM%\'
    AutoLoad = False
    TraceActive = False
    TraceFlags = []
    Left = 136
    Top = 80
  end
  object ConnectionManager: TDAConnectionManager
    MaxPoolSize = 10
    PoolTimeoutSeconds = 60
    PoolBehaviour = pbWait
    WaitIntervalSeconds = 1
    Connections = <
      item
        Name = 'IBX'
        ConnectionString = 
          'IBX?Server=xp_vm;Database=C:\Codigo\BD\BASEDATOS.FDB;UserID=sysd' +
          'ba;Password=masterkey;dialect=3;'
        Default = True
        Tag = 0
      end>
    DriverManager = DriverManager
    PoolingEnabled = True
    Left = 40
    Top = 80
  end
  object SessionManager: TROInMemorySessionManager
    SessionDuration = -1
    Left = 136
    Top = 144
  end
  object DataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'CODIGOEMPRESA'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. empresa'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'NOTAS'
        DataType = datString
        Size = 2000
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Notas'
        Alignment = taLeftJustify
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 150
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Calle'
        Alignment = taLeftJustify
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Provincia'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOPOSTAL'
        DataType = datString
        Size = 5
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. postal'
        Alignment = taLeftJustify
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 40
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Poblaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'TELEFONOPARTICULAR'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tlf. particular'
        Alignment = taLeftJustify
      end
      item
        Name = 'TELEFONOTRABAJO'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tlf. trabajo'
        Alignment = taLeftJustify
      end
      item
        Name = 'MOVIL'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'M'#243'vil'
        Alignment = taLeftJustify
      end
      item
        Name = 'FAX'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fax'
        Alignment = taLeftJustify
      end
      item
        Name = 'CORREO1'
        DataType = datString
        Size = 60
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail'
        Alignment = taLeftJustify
      end
      item
        Name = 'CORREO2'
        DataType = datString
        Size = 60
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail'
        Alignment = taLeftJustify
      end
      item
        Name = 'PAGINAWEB'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'P'#225'gina web'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGO (GENERICO)'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'C'#243'digo'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'digo'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOCATEGORIA_GEN'
        DataType = datAutoInc
        BlobType = dabtUnknown
        GeneratorName = 'GEN_CATEGORIAS'
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. categor'#237'a'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAALTA'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha de alta'
        Alignment = taLeftJustify
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Usuario de alta'
        Alignment = taLeftJustify
      end
      item
        Name = 'NIFCIF'
        DataType = datString
        Size = 10
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'NIF/CIF'
        Alignment = taLeftJustify
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Nombre'
        Alignment = taLeftJustify
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Descripci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'PERSONACONTACTO'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Persona de contacto'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOCATEGORIA'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. categor'#237'a'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOCONTACTO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. contacto'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 20
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Referencia'
        Alignment = taLeftJustify
      end
      item
        Name = 'TIPOPRESUPUESTO'
        DataType = datString
        Size = 10
        Description = 'Cocina, ba'#241'o, etc'
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Tipo'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAPRESUPUESTO'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha'
        Alignment = taLeftJustify
      end
      item
        Name = 'VIGENCIAPRESUPUESTO'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Vigencia'
        Alignment = taLeftJustify
      end
      item
        Name = 'SITUACIONPRESUPUESTO'
        DataType = datString
        Size = 30
        Description = 'Pendiente, aceptado o rechazado'
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Situaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHADECISION'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fecha decisi'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'BASEIMPONIBLE'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Base imponible'
        Alignment = taLeftJustify
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Descuento'
        Alignment = taLeftJustify
      end
      item
        Name = 'IMPORTEDESCUENTO'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Importe dto.'
        Alignment = taLeftJustify
      end
      item
        Name = 'IVA'
        DataType = datFloat
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'IMPORTEIVA'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Importe IVA'
        Alignment = taLeftJustify
      end
      item
        Name = 'IMPORTETOTAL'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Importe total'
        Alignment = taLeftJustify
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Observaciones'
        Alignment = taLeftJustify
      end
      item
        Name = 'PLAZOENTREGA'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Plazo de entrega'
        Alignment = taLeftJustify
      end
      item
        Name = 'FORMAPAGO'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Forma de pago'
        Alignment = taLeftJustify
      end
      item
        Name = 'NUMCONCEPTO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Num. concepto'
        Alignment = taLeftJustify
      end
      item
        Name = 'CANTIDAD'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Cantidad'
        Alignment = taLeftJustify
      end
      item
        Name = 'IMPORTEUNIDAD'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Importe unitario'
        Alignment = taLeftJustify
      end
      item
        Name = 'TIPODETALLESPRESUPUESTO'
        DataType = datString
        Size = 1
        Description = 'Cap'#237'tulo, etc'
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tipo'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOPRESUPUESTO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. presupuesto'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'DESCRIPCIONCONCEPTO'
        DataType = datString
        Size = 2000
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Descripci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'POSICIONCONCEPTO'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Posici'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOPEDIDO_GEN'
        DataType = datAutoInc
        BlobType = dabtUnknown
        GeneratorName = 'GEN_PEDIDOS'
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. pedido'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOPEDIDO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. pedido'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOALMACEN'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. almac'#233'n'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOMONTAJE'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. montaje'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'FECHAPEDIDO'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHACONFIRMACION'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Confirmaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'SITUACIONPEDIDO'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Situaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAENTREGA'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Entrega'
        Alignment = taLeftJustify
      end
      item
        Name = 'PedidosProveedor_DIRECCIONCOMPLETA'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'PedidosProveedor_INCIDENCIAS'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOALBARANCLIENTE'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. albar'#225'n'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'FECHAALBARANCLIENTE'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha'
        Alignment = taLeftJustify
      end
      item
        Name = 'SITUACIONALBARANCLIENTE'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Situaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAPAGO'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fecha de pago'
        Alignment = taLeftJustify
      end
      item
        Name = 'TIPODETALLESALBARANCLIENTE'
        DataType = datString
        Size = 1
        Description = 'Cap'#237'tulo, etc'
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tipo'
        Alignment = taLeftJustify
      end
      item
        Name = 'TELEFONO'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tel'#233'fono'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOALMACEN_GEN'
        DataType = datAutoInc
        BlobType = dabtUnknown
        GeneratorName = 'GEN_ALMACENES'
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. almac'#233'n'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOARTICULO_GEN'
        DataType = datAutoInc
        BlobType = dabtUnknown
        GeneratorName = 'GEN_ARTICULOS'
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. art'#237'culo'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'FECHAINI'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Inicio'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAFIN'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Finalizaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'SITUACIONMONTAJE'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Situaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAFACTURA'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAVENCIMIENTO'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Vencimiento'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOFACTURA'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. factura'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'VISIBLE'
        DataType = datString
        Size = 1
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Visible'
        Alignment = taLeftJustify
      end
      item
        Name = 'PUNTOS'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Puntos'
        Alignment = taLeftJustify
      end
      item
        Name = 'IMPORTEPUNTOS'
        DataType = datCurrency
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Importe puntos'
        Alignment = taLeftJustify
      end
      item
        Name = 'FECHAMODIFICACION'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fecha de pago'
        Alignment = taLeftJustify
      end
      item
        Name = 'CODIGOCUENTA_GEN'
        DataType = datAutoInc
        BlobType = dabtUnknown
        GeneratorName = 'GEN_CUENTAS'
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. cuenta'
        Alignment = taLeftJustify
        ServerAutoRefresh = True
      end
      item
        Name = 'CODIGOFACTURACLIENTE'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'CODIGOFACTURA'
        Alignment = taLeftJustify
      end
      item
        Name = 'TIPODETALLESFACTURACLIENTE'
        DataType = datString
        Size = 1
        Description = 'Cap'#237'tulo, etc'
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'TIPO'
        Alignment = taLeftJustify
      end
      item
        Name = 'DetallesFacturasCliente_VISIBLE'
        DataType = datString
        Size = 1
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'VISIBLE'
        Alignment = taLeftJustify
      end
      item
        Name = 'DetallesPresupuestos_VALORADO'
        DataType = datString
        Size = 1
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end>
    Left = 40
    Top = 144
  end
  object DADiagrams: TDADiagrams
    Left = 224
    Top = 144
    DiagramData = 
      '<Diagrams>'#13#10'  <Diagram Name="Diagrama" Left="-4" Top="-4" Width=' +
      '"1288" Height="1002">'#13#10'  </Diagram>'#13#10'</Diagrams>'#13#10
  end
  object JvAppRegistryStorage: TJvAppRegistryStorage
    StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
    StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
    Root = 'Software\%APPL_NAME%'
    SubStorages = <>
    Left = 136
    Top = 208
  end
end