{"id":1581,"date":"2019-03-25T17:35:44","date_gmt":"2019-03-25T20:35:44","guid":{"rendered":"http:\/\/xexeu.elipse.com.br\/pt\/utilizando-o-rmchart-no-e3\/"},"modified":"2019-08-21T09:48:47","modified_gmt":"2019-08-21T12:48:47","slug":"utilizando-o-rmchart-no-e3","status":"publish","type":"post","link":"https:\/\/kb.elipse.com.br\/en\/utilizando-o-rmchart-no-e3\/","title":{"rendered":"Utilizando o RMChart no E3."},"content":{"rendered":"

Introdu\u00e7\u00e3o<\/strong><\/span><\/p>\n

O ActiveX RMChart<\/span> pode ser usado no E3 para visualiza\u00e7\u00e3o gr\u00e1fica de dados. Al\u00e9m disso, \u00e9 ideal para apresentar informa\u00e7\u00f5es estat\u00edsticas, j\u00e1 que elas s\u00e3o carregadas no banco de dados e n\u00e3o \u00e9 necess\u00e1rio mostr\u00e1-las em tempo real.<\/div>\n

RMCDesigner<\/strong><\/span><\/p>\n

O RMCDesigner<\/span> \u00e9 um software que auxilia a cria\u00e7\u00e3o e desenvolvimento de um arquivo modelo (extens\u00e3o .rmc) que cont\u00e9m as configura\u00e7\u00f5es iniciais do gr\u00e1fico. Embora seja poss\u00edvel criar esta estrutura totalmente via scripts, o RMCDesigner<\/span> traz a vantagem de ter uma interface gr\u00e1fica mais amig\u00e1vel, facilitando o trabalho e proporcionando a visualiza\u00e7\u00e3o instant\u00e2nea dos efeitos aplicados.<\/div>\n

\"\"<\/p>\n

Ap\u00f3s a configura\u00e7\u00e3o do arquivo RMC, voc\u00ea ter\u00e1 um modelo de estrutura do gr\u00e1fico que poder\u00e1 ser utilizado em conjunto com o ActiveX no E3. Para isso, o RMCDesigner oferece uma ferramenta que far\u00e1 a extra\u00e7\u00e3o do c\u00f3digo necess\u00e1rio. Essa ferramenta est\u00e1 acess\u00edvel atrav\u00e9s do menu File \u2013 Get Source<\/span>.<\/div>\n

\"\"<\/p>\n

A linguagem utilizada nos scripts do E3 \u00e9 VBScript. A op\u00e7\u00e3o de linguagem ASP do RMCDesigner possui sintaxe compat\u00edvel com o VBScript. Dessa forma, iremos utilizar a configura\u00e7\u00e3o abaixo para extrair o c\u00f3digo que desejamos.<\/div>\n

\"\"<\/p>\n

Ap\u00f3s clicar em Ok<\/span>, o c\u00f3digo ser\u00e1 copiado para a \u00c1rea de Transfer\u00eancia.<\/div>\n

Integra\u00e7\u00e3o do RMChart com o E3<\/strong><\/span><\/p>\n

No E3, insira um objeto RMChart em uma tela clicando com bot\u00e3o direito e selecionando a op\u00e7\u00e3o Inserir – RMChartX<\/span>. No evento OnPreShow<\/span> da tela, crie um pick Script<\/span> e cole o c\u00f3digo obtido no RMCDesigner.
\nNa figura abaixo, \u00e9 mostrado o c\u00f3digo gerado anteriormente com as respectivas propriedades configuradas. Como \u00e9 poss\u00edvel ver, o comando With<\/span> precisa que a vari\u00e1vel RMChartX1<\/span> contenha um objeto RMChart.<\/div>\n

\"\"<\/p>\n

Portanto, antes da linha With RMChartX1<\/span>, insira a defini\u00e7\u00e3o da vari\u00e1vel recebendo o objeto RMChart que est\u00e1 na tela. Utilize o AppBrowser para localiz\u00e1-lo. Al\u00e9m disso, execute o m\u00e9todo Clear()<\/span> para evitar que dados antigos sejam carregados no ActiveX quando a aplica\u00e7\u00e3o for executada ou enquanto estiver executando. Exemplo:<\/div>\n
set<\/span> RMChartX1 = Item(\"RMChartX1\"<\/span>)\r\nRMChartX1.Clear()<\/pre>\n
Agora, sempre que a tela for aberta, este script ser\u00e1 executado definindo a configura\u00e7\u00e3o inicial do gr\u00e1fico.<\/div>\n
Carregando os dados no ActiveX<\/strong><\/span><\/p>\n
No RMChart, cada s\u00e9rie (conjunto de dados) possui a propriedade Datastring<\/span>, que cont\u00e9m os valores a serem desenhados. Esta propriedade exige que os valores estejam separados por asteriscos (\u201c15*39*21*17\u201d). Assim, se voc\u00ea possuir um gr\u00e1fico de barras, cada valor representar\u00e1 uma barra. Seguindo nosso exemplo acima, teremos:<\/div>\n
\"\"<\/p>\n
Vamos supor que desejamos apresentar nesse gr\u00e1fico de barras a quantidade total de alarmes hist\u00f3ricos por \u00e1rea. Para isso, precisamos criar uma consulta que retorne esta informa\u00e7\u00e3o. Ao configurar uma consulta, v\u00e1 \u00e0 aba SQL<\/span> e habilite a op\u00e7\u00e3o Habilita a edi\u00e7\u00e3o direta do SQL<\/span>. O seguinte c\u00f3digo deve ser digitado:<\/div>\n
SELECT Area, Count(ConditionActive) as TotalAlarmesAtivos
\nFROM Alarms
\nWHERE ConditionActive = 1
\nGROUP BY Area<\/em><\/p>\n
Digamos que o resultado dessa consulta seja:<\/p>\n\n\n\n\n\n\n
\n
\u00a0\u00c1rea<\/strong><\/p>\n<\/td>\n
\n
TotalAlarmesAtivos<\/strong><\/p>\n<\/td>\n<\/tr>\n
\u00a0AreaTanque1<\/td>\n\u00a0590<\/td>\n<\/tr>\n
\u00a0AreaTanque2<\/td>\n\u00a0630<\/td>\n<\/tr>\n
\u00a0AreaTanque3<\/td>\n\u00a0740<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n
Na tela que cont\u00e9m o objeto RMChart, colocaremos o seguinte script:<\/p>\n
\"\"<\/p>\n
\n
Como visto na imagem, \u00e9 necess\u00e1rio criar uma vari\u00e1vel que receba o objeto RMChart (nesse exemplo, o\u00a0RMChartX1<\/em>) e executar a consulta citada anteriormente utilizando o m\u00e9todo GetADORecordset()<\/span>. Dessa forma, o resultado da consulta ser\u00e1 manipulado via script.<\/p>\n
Um la\u00e7o While<\/em> ser\u00e1 executado at\u00e9 o \u00faltimo registro do Recordset, concatenando os valores retornados de acordo com a sintaxe da propriedade DataString<\/span> do RMChart (\u201c590*630*740\u201d). Por \u00faltimo, o m\u00e9todo Draw()<\/span> far\u00e1 o desenho do gr\u00e1fico.<\/p>\n<\/div>\n
Conclus\u00e3o<\/strong><\/span><\/p>\n
Uma vez configurado o modelo e extra\u00eddo o c\u00f3digo atrav\u00e9s do RMCDesigner, a tarefa restante ser\u00e1 inteiramente no E3, criando e configurando as consultas, e depois manipulando os seus resultados via Recordset. Assim, ser\u00e1 montada a String de dados para ser passada para o objeto RMChart.<\/span><\/p>\n
\n
O RMChart \u00e9 uma \u00f3tima ferramenta para visualizar gr\u00e1ficos estat\u00edsticos ou hist\u00f3ricos. Com sua ferramenta de aux\u00edlio para cria\u00e7\u00e3o do modelo, o trabalho se torna mais f\u00e1cil e a aplica\u00e7\u00e3o fica mais atrativa para o usu\u00e1rio.<\/p>\n
Obs.:<\/strong><\/p>\n
    \n
  • O RMCDesigner n\u00e3o \u00e9 instalado juntamente ao E3. Este software e\u00a0seus componentes podem ser encontrados para download na internet ou anexado\u00a0neste artigo.<\/li>\n
  • Em anexo, aplica\u00e7\u00e3o exemplo usando o RMChart\u00a0desenvolvida com o E3 3.2 build 248.<\/li>\n<\/ul>\n<\/div>\n
    <\/div>\n
    Refer\u00eancias<\/strong><\/span><\/p>\n
    – Guia de Refer\u00eancia do VBScript
    \n– Guia do RMChart<\/p>\n