Linha Microsiga Protheus

Árvore de páginas

P144COL - Adicionar colunas nas grids de resultados e documentos do MRP

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):
NomeTipoDescriçãoDefaultObrigatórioReferencia
PARAMIXB[1]Caractere

Grid na qual será adicionado a coluna.

"gridResult" - Grid de resultados

"gridDocs" - Grid de documentos



PARAMIXB[2]ArrayArray com os campos já adicionados na grid


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 P144COL permite o usuario adicionar campos nas grids de resultados e documentos da rotina de geração de documentos do MRP.
Localização:

Funções gridResult e gridDocs do fonte PCPA144.prw

Eventos:

Permite o usuário adicionar colunas nas grids da rotina.

Programa Fonte:PCPA144.prw

Sintaxe:

P144COL( ) → aCabPers

Retorno:

Deve retornar um array com os campos que serão adicionados na grid.

Observações:

O array com as informações da coluna que será adicionada deve seguir o formato do exemplo.

A manipulação dos dados neste campo deve ser feita no ponto de entrada P144ITM

Este ponto de entrada não está disponível na tela de resultados PO UI (resultadomrp)

Exemplo
#INCLUDE "PROTHEUS.CH"  

User Function P144COL()
    Local aCabPers := {}
    Local cGridSel:= PARAMIXB[1]
    Local aHeadSel:= PARAMIXB[2]

    If cGridSel == "gridResult"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                            "Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    ElseIf cGridSel == "gridDocs"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                        	"Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    EndIf

Return aCabPers