<% set con = server.CreateObject("ADODB.Connection") con.Open(Application("ConnString")) set rs = Server.CreateObject("ADODB.Recordset") 'ano_abertura = Year(Date()) ano_abertura = 2014 sSQL = "Rentabilidades_Mensais_Site 338451," & ano_abertura 'response.write sSQL Rs.Open sSQL, con rsArray = Rs.GetRows() rs.Close sSQL = "Rentabilidades_Acumuladas_Site 338451," & ano_abertura 'response.write sSQL Rs.Open sSQL, con rsAcum = Rs.GetRows() rs.Close set rs = Nothing set con = Nothing %>

Focus EAC

Rentabilidade Acumulada

<%For i = 0 to UBound(rsArray, 2)%> <%Next%>
Mês          Fundo Ibovespa Performance
<%=rsArray(1,i)%> <%=AcertaNumero_Traco(rsArray(2,i),3,"%")%> <%=AcertaNumero_Traco(rsArray(3,i),3,"%")%> <%=AcertaNumero_Traco(rsArray(4,i),3,"")%>
Acumulado <%=AcertaNumero_Traco(rsAcum(1,0),3,"%")%> <%=AcertaNumero_Traco(rsAcum(2,0),3,"%")%> <%=AcertaNumero_Traco(rsAcum(3,0),3,"")%>

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.