select RTRIM(f.Codigo) CodigoFazenda,
       f.Nome,
	   t.Codigo CodigoTalhao,
	   tp.Descricao TpVinculo,
	   I.Descricao DescricaoInsumoAgricola,
	   I.Unidade UnidadeInsumoAgric,
	   CAST(AP.Dosagem AS FLOAT(10)) Dosagem,
	   t.AreaTotal,
	   CAST((AP.Dosagem * t.AreaTotal) AS FLOAT(10)) Quantidade,
	   AP.DataAplicInicial DataAplicacaoInicial,
	   apt.AreaAplic,
       tr.idtalhao,
       CASE WHEN NVL(ap.IDAplicInsumoAgric, 0) > 0 THEN 'Sim'
            ELSE 'Nao'
       END Aplicou
FROM dbo.TalhaoRestrito tr
INNER JOIN dbo.AplicInsumoAgricTalhao APT ON APT.IDTalhao = tr.IDTalhao
INNER JOIN dbo.AplicInsumoAgric AP ON ap.IDAplicInsumoAgric = apt.IDAplicInsumoAgric
INNER JOIN dbo.InsumoAgric I ON I.IDInsumoAgric = AP.IDInsumoAgric
INNER JOIN dbo.PragaDoenca praga ON praga.IDPraga = 2/*##IDPRAGASESSAO##*/
INNER JOIN dbo.DefensivoAgric d
on d.IDInsumoAgric = ap.IDInsumoAgric
   and (CASE praga.Sigla
	  		 WHEN 'BRCA' THEN d.Broca
			 WHEN 'CIGA' THEN d.Cigarrinha
			 WHEN 'PSOL' THEN d.PragasSolos
			 WHEN 'FERA' THEN d.Ferrugem
			ELSE 0
		END) = 1
INNER JOIN dbo.Talhao t ON t.IDTalhao = tr.IDTalhao
INNER JOIN dbo.Fazenda f ON f.IDFazenda = t.IDFazenda
INNER JOIN dbo.TpVinculo tp ON tp.IDTpVinculo = f.IDTpVinculo
LEFT JOIN dbo.HistDetalhado h
ON h.IDTalhao = apt.IDTalhao
   AND h.DataInicialSafra <= ap.DataAplicInicial
   AND h.DataFinalSafra > ap.DataAplicInicial
WHERE AP.IDUSINA = 1/*##IDUSINASESSAO##*/ and H.Ativo = 1