inherited dmInformePresupuestoCliente: TdmInformePresupuestoCliente
  OldCreateOrder = True
  Left = 297
  Top = 110
  Height = 416
  Width = 548
  inherited FReport: TfrReport
    Dataset = TablaCab
    ReportForm = {19000000}
  end
  object TablaCab: TfrDBDataSet
    CloseDataSource = True
    DataSet = TablaPresupuesto
    Left = 152
    Top = 32
  end
  object TablaDet: TfrDBDataSet
    CloseDataSource = True
    DataSet = TablaDetallesPresupuesto
    Left = 216
    Top = 32
  end
  object TablaPresupuesto: TIBQuery
    BufferChunks = 1000
    CachedUpdates = False
    Left = 152
    Top = 88
  end
  object TablaDetallesPresupuesto: TIBQuery
    BufferChunks = 1000
    CachedUpdates = False
    DataSource = dsPresupuesto
    Left = 256
    Top = 88
  end
  object TablaPropiedadesPresupuesto: TIBQuery
    BufferChunks = 1000
    CachedUpdates = False
    DataSource = dsDetallesPresupuesto
    Left = 392
    Top = 88
  end
  object TablaProp: TfrDBDataSet
    CloseDataSource = True
    DataSet = TablaPropiedadesPresupuesto
    Left = 280
    Top = 32
  end
  object dsDetallesPresupuesto: TDataSource
    DataSet = TablaDetallesPresupuesto
    Left = 264
    Top = 144
  end
  object dsPropiedadesPresupuesto: TDataSource
    DataSet = TablaPropiedadesPresupuesto
    Left = 392
    Top = 144
  end
  object dsPresupuesto: TDataSource
    DataSet = TablaPresupuesto
    Left = 152
    Top = 144
  end
  object TablaPrecios1: TIBQuery
    BufferChunks = 1000
    CachedUpdates = False
    DataSource = dsPresupuesto
    SQL.Strings = (
      'select * from  DETALLESPRESUPUESTOSARTICULOS'
      'where codigopresupuesto  = :codigo and '
      'NUMCONCEPTO > 1 AND NUMCONCEPTO < 4 AND '
      'TIPOCONCEPTO = '#39'PRECIO'#39
      'order by numconcepto')
    Left = 152
    Top = 200
    ParamData = <
      item
        DataType = ftString
        Name = 'CODIGO'
        ParamType = ptUnknown
        Size = 13
      end>
  end
  object TablaPrec1: TfrDBDataSet
    DataSource = dsPrecios1
    Left = 152
    Top = 304
  end
  object dsPrecios1: TDataSource
    DataSet = TablaPrecios1
    Left = 152
    Top = 256
  end
end