Perguntas Dúvida com MatGraph

Bom dia!
Ainda não tinha utilizado o MatGraph, daí resolvi testar, mas não ta dando certo. Ele executa a rotina normalmente mas não aparece o grafico.
O que está faltando? Mais uma dúvida aí. Como faço pra essa query me mostrar só a soma do mês?. Pra ela me mostrar 12 resultados.
A baixo o fonte. Ele original era com array. Fiz com arquivo de trabalho.

user function GRAFVEND()
local lGraph3D := .t. // .F. Grafico 2 dimensoes - .T. Grafico 3 dimensoes
local lMenuGraph := .t. // .F. Nao exibe menu - .T. Exibe menu para mudar o tipo de grafico
local lMudaCor := .t.
local nTipoGraph := 2
local nCorDefault

If MsgYesNo("Deseja exibir o grafico de vendas anual?")

cAliasQry := GetNextAlias()
BeginSql Alias cAliasQry

select D2_EMISSAO,
sum(D2_TOTAL) VENDAS
from %table:SD2% where
D2_FILIAL = %xfilial:SD2% AND
%notdel% AND
D2_EMISSAO between '20130101' and '20131231'
GROUP BY D2_EMISSAO

EndSql
(cAliasQry)->(dbGoTop())

While !(cAliasQry)->(Eof())
eixoX := (cAliasQry)->D2_EMISSAO
eixoY := (cAliasQry)->VENDAS
// O grafico sera montado a partir dos dados da area de trabalho "GRAFICO"
MatGraph("Graficos", lGraph3D, lMenuGraph, lMudaCor, nTipoGraph, nCorDefault,,"cAliasQry",{"eixoX","eixoY"})
(cAliasQry)->(DbSkip())

// Verificando se o Alias ja esta em uso.
If Select(cAliasQry) > 0
(cAliasQry)->(DbCloseArea())
EndIf
ENDDO
EndIf
Return

A query fiz assim agora:
select year(D2_EMISSAO) ANO,
month(D2_EMISSAO) MES,
sum(D2_TOTAL) VENDAS
from sd2000 where
D2_FILIAL = '00' AND
D_E_L_E_T_='' AND
year(D2_EMISSAO)=2013
GROUP BY D2_EMISSAO
Mas não sei pq está mostrando mais de 1 resultado por mês.

Brother vc conseguiu resolver ? poderia me passar o código fonte to precisando fazer algo parecido mais não tá montando o gráfico de jeito nenhum.