USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Grafico Crystal Urgente.....
Leolima
PORTO ALEGRE
RS - BRASIL
Postada em 19/05/2006 09:37 hs            
Ola!
 
Uso crystal 11 e minha duvida é a seguinte:
Preciso guardar um valor em uma variavel!! Como fazer??
 
Tenho um grafico que mostra 'on change of' {command.descricao}
E mostra valores de uma formula:
            'Show Values'  Sum of @porcento
                                Esta segunda eu farei apartir da primeira.
 
No ('on change of' {command.descricao}) no comando
     'TopN '
     -> For this group sort    : Top Prencentage
 
     -> Where Porcentage is: 95
 
     -> based on: Sum of @porcento
 
     -> Inclide others, with the name: Outros
 
Isto faz o seguinte:
      Pega os iténs para mostrar(ordenado do maior para o menor) até chegar os 95% do total de 'Sum of @porcento', os iténs os iténs de 95% até 100% coloca em uma coluna final nomeado como 'outros'
 
Até ai tudo bem, o gráfico ficaria assim.
 
 
item1(65%) - item2(17%)-item3(15%)-outros(3%)
Esta é a minha primeira opcao de show values.
                            100%
o-
                           50%
     
        o__
             
                o___
                      o      0%
Graficamente ela ficaria como mostrado acima.
Minha dificuldade é a seguinte, eu preciso somar estas porcentagens e mostrar uma a uma, usando o exemplo acima ficaria assim:
 
item1(65%) - item2(82%)-item3(97%)-outros(100%)
O grafico pronto ficaria assim:
                              
                 __--o  100%   100%
               o   97%         
          __/ 
        o  80%
     /                        
o-  65%
                                    50%
     
        o__  17%
             
                o___   15%
                      o    3%     0%
 
Isto eu faria da seguinte forma
----------------------
dim x as number
if( PreviousIsNull({command.descricao})) then
    x = {Command_1.descricao} * 100 / Sum ({command.descricao})
else
    x = (PreviousValue({Command_1.descricao}) * 100 / {?nQtdIni}) + ({Command_1.descricao} * 100 / Sum ({command.descricao}))
end if
    x = x + ({command.descricao})
formula = x
x = formula
-------------------------
Isto não esta funcionando???
Nem necessáriamente precisa ser desta forma, mas se alguém souber como resolver eu ficaria muito grato.
 
 
             
 

"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein)

----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP.  Acredite se quiser!---- 
 Leonardo Cassuriaga                                                            Fone:(51) 96394735
 Tecnico Informática                              __o                              Programador VB6.0
 Programador Web                              _>/,                                          DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles   Darwin :   As   espécies   que   sobrevivem   não   são   as   mais   fortes,    mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------

     
Leolima
PORTO ALEGRE
RS - BRASIL
ENUNCIADA !
Postada em 22/05/2006 09:41 hs            
Putz!!!!
Ninguém msm???
Valeu!!!

"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein)

----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP.  Acredite se quiser!---- 
 Leonardo Cassuriaga                                                            Fone:(51) 96394735
 Tecnico Informática                              __o                              Programador VB6.0
 Programador Web                              _>/,                                          DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles   Darwin :   As   espécies   que   sobrevivem   não   são   as   mais   fortes,    mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------

   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página