Introdução
O ActiveX RMChart pode ser usado no E3 para visualização gráfica de dados e é ideal para apresentar informações estatísticas, já que elas são carregadas no banco de dados e não é necessário mostrá-las em tempo real.
RMCDesigner
O RMCDesigner é um software que auxilia a criação e desenvolvimento de um arquivo modelo (extensão .rmc) que contém as configurações iniciais do gráfico. Apesar de ser possível criar essa estrutura totalmente via scripts, o RMCDesigner traz a vantagem de ter uma interface gráfica mais amigável, facilitando o trabalho e proporcionando a visualização instantânea dos efeitos aplicados.
Obs.: O RMCDesigner não é instalado junto com o E3. Este software pode ser encontrado para download na internet.
Após a configuração do arquivo rmc, você terá um modelo de estrutura do gráfico que poderá ser usado em conjunto com o ActiveX no E3. Para isso, o RMCDesigner oferece uma ferramenta que fará a extração do código equivalente. Essa ferramenta está acessível pelo menu File – Get Source.
A linguagem utilizada nos scripts do E3 é VBScript. A opção de linguagem ASP do RMCDesigner possui sintaxe compatível com o VBScript. Dessa forma, iremos utilizar a configuração abaixo para extrair o código que desejamos.
Após clicar em Ok, o código será copiado para a Área de Transferência.
Integração do RMChart com o E3
No E3, insira um objeto RMChart em uma tela clicando com botão direito e selecionando a opção Inserir - RMChartX. No evento OnPreShow da tela, crie um pick Script e cole o código obtido no RMCDesigner.
Na figura abaixo, é mostrado o código gerado anteriormente com as respectivas propriedades configuradas. Como é possível ver, o comando With precisa que a variável RMChartX1 contenha um objeto RMChart.
Portanto, antes da linha With RMChartX1, insira a definição da variável recebendo o objeto RMChart que está na tela. Utilize o AppBrowser para localizá-lo. Além disso, execute o método Clear() para evitar que dados antigos sejam carregados no ActiveX quando a aplicação for executada ou enquanto estiver executando. Exemplo:
set RMChartX1 = Item("RMChartX1")
RMChartX1.Clear()
Agora, sempre que a tela for aberta, este script será executado definindo a configuração inicial do gráfico.
Carregando os dados no ActiveX
No RMChart, cada série (conjunto de dados) possui a propriedade Datastring, a qual contém os valores a serem desenhados. Esta propriedade exige que os valores estejam separados por asteriscos (“15*39*21*17”). Assim, se você possuir um gráfico de barras, cada valor representará uma barra. Seguindo nosso exemplo acima, temos:
Vamos supor que desejamos apresentar nesse gráfico de barras a quantidade total de alarmes históricos por área. Para isso, precisamos criar uma consulta que retorne esta informação. Ao configurar uma consulta, vá à aba SQL e habilite a opção Habilita a edição direta do SQL. O seguinte código deve ser digitado:
SELECT Area, Count(ConditionActive) as TotalAlarmesAtivos
FROM Alarms
WHERE ConditionActive = 1
GROUP BY Area
Vamos supor que o resultado dessa consulta foi:
|
Área |
TotalAlermesAtivos |
| AreaTanque1 | 590 |
| AreaTanque2 | 630 |
| AreaTanque3 | 740 |

Em anexo, há uma aplicação exemplo usando o RMChart desenvolvida com o E3 3.2 build 248.
Referências
- Guia de Referência do VBScript
- Guia do RMChart
- www.rmchart.com