Histórico da Página

#INCLUDE "Protheus.ch"
  
User Function PBData()
    Local nCodVisao := PARAMIXB[1] //Código da visão
    Local nSeqVisao := PARAMIXB[2] //Sequencia da visão
    Local cCodMon   := PARAMIXB[23] //Código do monitor
    Local oJson     := PARAMIXB[34] //Estrutura do monitor
     
    If nCodVisao == 5 .And. nSeqVisao == 1 //Verifica se está na visão correta
        If cCodMon == "000000000008" //Monitor "Acomp. Lotes a vencer"
           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" //Monitor "Situação de ordens de produção"
            //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