Árvore de páginas

Versões comparadas

Chave

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

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)

Bloco de código
languagec#
firstline1
titleExemplo
linenumberstrue
#INCLUDE "PROTHEUS.CH"  

User Function P144VLGDP144COL()
	Local cTicket     Local aCabPers := {}
    Local cGridSel:= PARAMIXB[1]
	Local lVld    := .F. 

	Help( ,, 'P144VLGD',, "Geração dos documento do ticket " + cTicket + " bloqueada!", 1, 0)	

Return lVld      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