Gráficos

Boa tarde,

Alguém tem um exemplo de como crie um gráfico em progress. Eu fiz um simples em barras usando html e aumantando o tamenho de um gif, mas gostaria de saber se há algo mais dinâmico, ou se é possível exportar dados para o excel. Obrigado

É isto que pretende?



Não exporta para Excel ...

Baltazar, como posso fazer gráficos desse tipo?

É isto sim Baltazar, como eu posso gerar um gráfico destes.

Legal, também estou precisando desenvolver uma aplicação deste tipo.

Att,

Diogo

Segue exemplo.

Código:

DO:
    
    assign
        n-series = 1.
        n-pontos = 1.
        
    titulo[1] = "Total de Amostras : " + string(tot-soma).
    titulo[2] = "Total de Amostras : " + string(tot-soma1).

    if num-entries(selfamartigos:screen-value) = 1 then do:

        titulo[3] = "Amostras por Estado ["      + substr(entry(1,selfamartigos:screen-value),1,3) + "]".
        titulo[4] = "Não Aprovadas por Motivo [" + substr(entry(1,selfamartigos:screen-value),1,3) + "]".
        
    end.
    else do:
    
        titulo[3] = "Amostras por Estado".
        titulo[4] = "Não Aprovadas por Motivo".

    end.


    titulo[5] = "Intervalo de  " + string(txtdataini:screen-value) + "  a  " + string(txtdatafim:screen-value).

    /*
    --
    --
    */
    
    i = 1.

    for each tt_estados no-lock:

        valores-y1[i]   = tt_estados.soma.
        legendas-x1[i]  = tt_estados.est_cod + " (" + string(tt_estados.soma) + ")".
        
        i = i + 1.
        
    end.

    valores-y1[i] = -1.
    
    i1 = 1.

    for each tt_motna no-lock:

        valores-y2[i1]   = tt_motna.soma.
        legendas-x2[i1]  = tt_motna.mot_cod + " (" + string(tt_motna.soma) + ")".
        
        i1 = i1 + 1.

    end.

    valores-y2[i1] = -1.
 
    run hx_c0121.w.
    
    RUN LimpaDadosGrafico.

    apply "value-changed":U to brwestados.
    
    apply "entry":U to btnsair.
                               
    
END.

Em anexo, está 2 programas e respectivo OCX.