<% set con = server.CreateObject("ADODB.Connection") con.Open(Application("ConnString")) set rs = Server.CreateObject("ADODB.Recordset") 'ano_abertura = Year(Date()) ano_abertura = 2017 if ano_abertura = 2013 then sSQL = "select * from CD_12_focus.FIA where Data between '01-01-2013' and '12-01-2013' order by Data" 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "select sum(FocusFia),sum(Ibovespa),sum(Performance) from FIA where Data between '01-01-2013' and '12-01-2013'" 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close elseif ano_abertura = 2014 then sSQL = "select * from CD_12_focus.FIA where Data between '01-01-2014' and '12-01-2014' order by Data" 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "select sum(FocusFia),sum(Ibovespa),sum(Performance) from FIA where Data between '01-01-2014' and '12-01-2014'" 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close elseif ano_abertura = 2015 then sSQL = "select * from CD_12_focus.FIA where Data between '01-01-2015' and '12-01-2015' order by Data" 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "select sum(FocusFia),sum(Ibovespa),sum(Performance) from FIA where Data between '01-01-2015' and '12-01-2015'" 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close elseif ano_abertura = 2016 then sSQL = "select * from CD_12_focus.FIA where Data between '01-01-2016' and '12-01-2016' order by Data" 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "select sum(FocusFia),sum(Ibovespa),sum(Performance) from FIA where Data between '01-01-2016' and '12-01-2016'" 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close else ano_abertura = 2017 sSQL = "select * from CD_12_focus.FIA where Data between '01-01-2017' and '12-01-2017' order by Data" 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "select ((select FCFIA from BancoFundos where Data = DATEADD(MONTH, DATEDIFF(MONTH, -1, GETDATE())-1, -1))/(select TOP 1 FCFIA from BancoFundos where Data between '2016-01-01' and '2016-12-31' order by Data DESC)-1)*100 AS FCFIA,((select Ibovespa from BancoFundos where Data = DATEADD(MONTH, DATEDIFF(MONTH, -1, GETDATE())-1, -1))/(select TOP 1 Ibovespa from BancoFundos where Data between '2016-01-01' and '2016-12-31' order by Data DESC)-1)*100 AS Ibovespa,(select (select ((select FCFIA from BancoFundos where Data = DATEADD(MONTH, DATEDIFF(MONTH, -1, GETDATE())-1, -1))/(select TOP 1 FCFIA from BancoFundos where Data between '2016-01-01' and '2016-12-31' order by Data DESC)-1)*100 AS FCFIA)-(((select Ibovespa from BancoFundos where Data = DATEADD(MONTH, DATEDIFF(MONTH, -1, GETDATE())-1, -1))/(select TOP 1 Ibovespa from BancoFundos where Data between '2016-01-01' and '2016-12-31' order by Data DESC)-1)*100)) AS Performance" 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close end if set rs = Nothing set con = Nothing %>

Focus FIA BDR Nível I

Rentabilidade Acumulada

<%=ano_abertura%>

Conforme dispõe a instrução CVM 465, a partir de 02 maio de 2008 os fundos de Investimentos devem avaliar seus ativos pela cotação de fechamento. Portanto, a partir desta data o índice utilizado para comparação passará a ser o Ibovespa de fechamento ao invés do Ibovespa Médio. Ressalta-se que no mês de maio de 2008, para possibilitar a comparação, foi utilizada a variação do Ibovespa de fechamento em 30 de maio contra o Ibovespa médio de 30 de abril.