inherited dmInformeListadoPedidosProv: TdmInformeListadoPedidosProv
  OldCreateOrder = True
  Left = 319
  Top = 163
  Width = 692
  inherited FReport: TfrReport
    ReportForm = {19000000}
  end
  object TablaPedidos: TIBQuery
    BufferChunks = 1000
    CachedUpdates = False
    SQL.Strings = (
      
        'select codigo, fechaalta, nombre, fechaemision, fecharecepcion, ' +
        'situacion, importetotal'
      'from PEDIDOSPROVEEDOR '
      'where (FECHAALTA between :FECHAINI and :FECHAFIN) '
      'and (CODIGOEMPRESA = :CODIGOEMPRESA) '
      'order by FECHAALTA, CODIGO')
    Left = 184
    Top = 128
    ParamData = <
      item
        DataType = ftDate
        Name = 'FECHAINI'
        ParamType = ptInputOutput
      end
      item
        DataType = ftDate
        Name = 'FECHAFIN'
        ParamType = ptInputOutput
      end
      item
        DataType = ftSmallint
        Name = 'CODIGOEMPRESA'
        ParamType = ptInputOutput
        Value = 0
      end>
  end
  object frdsTablaPedidos: TfrDBDataSet
    CloseDataSource = True
    DataSet = TablaPedidos
    Left = 272
    Top = 128
  end
end
