Á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
Ticket selecionado para gerar os documentos

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
P144VLGD
P144COL permite o
usuário validar a geração de documentos. Permitindo ou não a geração dos documentos
usuario adicionar campos nas grids de resultados e documentos da rotina de geração de documentos do MRP.
Localização:
Função validaGera

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

Eventos:

Permite o usuário

validar se irá ou não gerar os documentos para o ticket selecionado

adicionar colunas nas grids da rotina.

Programa Fonte:PCPA144.prw

Sintaxe:

P144VLGD

P144COL( ) →

lVld 

aCabPers

Retorno:

Deve retornar

verdadeiro caso possa gerar os documento ou falso caso não possa gerar os documentos

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