Linha Microsiga Protheus

Árvore de páginas

PBDetail - 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[4] - Json em formato texto 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 PBDetail permite ao usuário alterar os dados e modo de exibição dos detalhes dos monitores.
Localização:

Função BuscaDetal da rotina PCPMONITORAPI.prw

Eventos:

Sempre que o usuário selecionar a opção "Detalhes" em qualquer monitor do Gestão à Vista.

Programa Fonte:PCPMONITOR.prw

Sintaxe:

PBDetail() → cReturn 

Retorno:

cReturn - Json em formato texto com as informações à serem apresentadas no monitor.

Observações:


Exemplo:

O exemplo abaixo realiza alterações nos detalhes de dois monitores de uma visão, é possível alterar a visibilidade de colunas, alterar títulos das colunas, adicionar novas tags e/ou revisar os dados resultantes.

Exemplo
#INCLUDE "Protheus.ch"
  
User Function PBDetail()
    Local nCodVisao := PARAMIXB[1] //Código da visão
    Local cCodMon   := PARAMIXB[2] //Código do monitor
    Local nSeqVisao := PARAMIXB[3] //Sequencia do monitor na visão
    Local cReturn   := ""
    Local oJson     := JsonObject():New()
 
    oJson:FromJson(PARAMIXB[4]) //Converte o parâmetro texto para objeto Json
 
    If nCodVisao == 5
        If cCodMon == "000000000008" .And. nSeqVisao == 1
            //Altera o título da coluna "Produto"
            oJson["columns"][4]["label"] := "Prod."
            //Altera a visibilidade da coluna Un. Medida (pode ser alterado manualmente durante a execução pelo gerenciador de colunas)
            oJson["columns"][10]["visible"] := .F.
            //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"] := "blue"
            //Altera a possibilidade de exportação para CSV.
            oJson["canExportCSV"] := .F.
        EndIf
        If cCodMon == "000000000010" .And. nSeqVisao == 2
            //Altera o título da coluna ordem de produção
            oJson["columns"][3]["label"] := "Ordem"
            //Altera a visibilidade da coluna descrição do Armazém (pode ser alterado manualmente durante a execução pelo gerenciador de colunas)
            oJson["columns"][6]["visible"] := .F.
            //Adiciona uma tag customizada
            aAdd(oJson["tags"], JsonObject():New())
            oJson["tags"][3]["icone"] := "po-icon-bar-code"
            oJson["tags"][3]["texto"] := "Tag customizada"
            oJson["tags"][3]["colorTexto"] := "red"
            //Altera a possibilidade de exportação para CSV.
            oJson["canExportCSV"] := .F.
        EndIf
    EndIf
    cReturn := oJson:ToJson() //Converte o objeto Json em texto
Return cReturn

Antes das alterações


Depois das alterações