Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

PBData - Alterações da apresentação de dados do

...

Gestão à Vista

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):
NomeTipoDescriçãoDefaultObrigatórioReferencia
PARAMIXBArray

PARAMIXB[1] - código da visão (numérico), pode ser consultado na tabela HZC, campo HZC_VISAO

PARAMIXB[2] - código do monitor (texto), pode ser consultado na tabela HZC, campo HZC_MONIT

PARAMIXB[3] - sequência do monitor na visão (numérico), pode ser consultado na tabela HZC, campo HZC_SEQUEN

PARAMIXB[42] - Objeto Json com a estrutura utilizada para renderização dos monitores.


X

Idiomas:

Todos

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:O ponto de entrada PBData permite o ao usuário alterar resultados, alterar cores e adicionar tags adicionais nos monitores da rotina gestão Gestão à vistaVista
Localização:

Função BuscaDados da rotina PCPMONITORAPI.prw

Eventos:

A cada atualização de cada um dos monitores da rotina gestão Gestão à vistaVista.

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, do monitor e a sequência do monitor na visão como parâmetros, permitindo 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
languagec#
firstline1
titleExemplo
linenumberstrue
#INCLUDE "Protheus.ch"
  
User Function PBDetailPBData()
 
    Local cReturnnCodVisao := "" PARAMIXB[1] //Código da visão
    Local cCodMon   := PARAMIXB[12] //Código do monitor
    Local oJson   := JsonObject():New()

nSeqVisao := PARAMIXB[3] //Sequencia do monitor na visão
    Local oJson:FromJson(     := PARAMIXB[24]) //Converte o parâmetro texto para Json

Estrutura do monitor
     
    If cCodMonnCodVisao == "000000000008"
       5 //AlteraVerifica ose títuloestá dana colunavisão "Produto"correta
         oJson["columns"][3]["label"] :If cCodMon == "Prod.000000000008"

 .And. nSeqVisao == 1 //Verifica se é //Alterao amonitor visibilidadecorreto
 da coluna Un. Medida ( pode ser alterado manualmente durante a execução//Altera pelouma gerenciadorcategoria dedo colunas)monitor
            oJson["columnsseries"][101]["visiblecolor"]   := .F.

"red"
             
            //Adiciona uma tag customizada
            aAdd(oJson["tags"], JsonObject():New())
            oJson["tags"][46]["icone"] := "po-icon-bar-code"
            oJson["tags"][46]["texto"] := "Tag customizada"
            oJson["tags"][46]["colorTexto"] := "bluegreen"
        EndIf
     
        If cCodMon == "000000000010" .And. nSeqVisao == 2 //Verifica se é o monitor correto 
            //Altera a possibilidade de exportação para CSV. uma categoria do monitor
            oJson["series"][1]["label"]   := "Prevista"
            oJson["canExportCSVseries"][1]["color"]   := .F."rgb(0,0,255)"
    EndIf

       If cCodMon == "000000000010"
 oJson["series"][1]["tooltip"] := "Ordens Previstas"
             
            //Altera oa cor títulodas dacategorias
 coluna ordem de produção
        oJson["columnsseries"][32]["labelcolor"] := "Ordemgreen"

         //Altera a visibilidade da coluna descrição do Armazém ( pode ser alterado manualmente durante a execução pelo gerenciador de colunas)
 oJson["series"][3]["color"] := "yellow"
            oJson["series"][4]["color"] := "red"
            oJson["columnsseries"][65]["visiblecolor"] := .F.
"black"
 
            //Adiciona uma tag customizada
            aAdd(oJson["tags"], JsonObject():New())
            oJson["tags"][34]["icone"] := "po-icon-bar-code"
            oJson["tags"][34]["texto"] := "Tag customizada"
            oJson["tags"][34]["colorTexto"] := "redgreen"

        //AlteraEndIf
 a possibilidade de exportação para CSV. EndIf
        oJson["canExportCSV"] := .F.
    EndIf
    cReturn := oJson:ToJson() //Converte o objeto Json em texto 
Return cReturn
Return Nil

Visão "Ordens" sem alterações.

Image Added

Visão "Ordens" com as alterações realizadas no exemplo PBData.

Image Added