Histórico da Página
...
Descrição: | O ponto de entrada PBData permite o usuário alterar resultados, alterar cores e adicionar tags adicionais nos monitores da rotina gestão à vista. |
Localização: | Função BuscaDados da rotina PCPMONITORAPI.prw |
Eventos: | A cada atualização de cada um dos monitores da rotina gestão à vista. |
Programa Fonte: | PCPMONITOR.prw |
Sintaxe: | PBData ( ) → oJsonRet |
Retorno: | oJsonRet- Objeto com as informações à serem apresentadas no monitor, a alteração desse objeto é feito por referência, não sendo retornado explicitamente pelo ponto de entrada. |
Observações: |
Exemplo:
O exemplo abaixo realiza alterações em dois monitores de uma visão. A partir deste ponto de entrada é possível realizar alterações em n monitores de n visões diferentes, para isso são passados o código da visão e do monitor como parâmetros, dessa maneira é possível identificar em qual monitor específico serão feitas as alterações desejadas. No exemplo são adicionadas tags adicionais, alteradas cores e textos dos monitores, também é possível complementar os dados retornados.
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#INCLUDE "Protheus.ch" User Function PBData() Local nCodVisao := PARAMIXB[1] //Código da visão Local cCodMon := PARAMIXB[2] //Código do monitor Local oJson := PARAMIXB[3] //Estrutura do monitor If nCodVisao == 5 //Verifica se está na visão correta If cCodMon == "000000000008" //Verifica se é o monitor correto //Altera uma categoria do monitor oJson["series"][1]["color"] := "red" //Adiciona uma tag customizada aAdd(oJson["tags"], JsonObject():New()) oJson["tags"][6]["icone"] := "po-icon-bar-code" oJson["tags"][6]["texto"] := "Tag customizada" oJson["tags"][6]["colorTexto"] := "green" EndIf If cCodMon == "000000000010" //Altera uma categoria do monitor oJson["series"][1]["label"] := "Prevista" oJson["series"][1]["color"] := "rgb(0,0,255)" oJson["series"][1]["tooltip"] := "Ordens Previstas" //Altera a cor das categorias oJson["series"][2]["color"] := "green" oJson["series"][3]["color"] := "yellow" oJson["series"][4]["color"] := "red" oJson["series"][5]["color"] := "black" //Adiciona uma tag customizada aAdd(oJson["tags"], JsonObject():New()) oJson["tags"][4]["icone"] := "po-icon-bar-code" oJson["tags"][4]["texto"] := "Tag customizada" oJson["tags"][4]["colorTexto"] := "green" EndIf EndIf Return Nil |
Visão "Ordens" sem o ponto de entrada. |
---|
Visão "Ordens" com as alterações realizadas no exemplo |