O ponto de entrada MT120PCOK é utilizado para validar a inclusão do pedido de compra (MATA120) após a confirmação do formulário.
Localização:
Na validação total do formulário, após a confirmação de inclusão e/ou alteração.
Eventos:
Não permitir a inclusão e/ou alteração do pedido.
Programa Fonte:
MATA120
Função:
A120TUDOK
Observações:
Esse ponto de entrada possui os mesmos primeiros 8 caracteres do MT120PCOL - Valida Pedido de Compra Item a Item, fazendo com que ambos sejam executados em pontos distintos. Para tratar esse problema sem afetar validações do legado, foi disponibilizado noMATA120 com data maior ou igual a o parâmetro abaixo onde é possível identificar a partir de qual ponto está sendo executada a chamada do ponto de entrada.
Parâmetros:
Nome
Tipo
Descrição
Obrigatório
PARAMIXB[1]
Numérico
Chamada em Execução (1 = A120LINOK, 2 = A120TUDOK)
X
Retorno:
Nome
Tipo
Descrição
Obrigatório
lRet
Logico
.T. = Linha validada
.F. = Linha invalidada
X
Exemplo:
#INCLUDE "PROTHEUS.CH"
User Function MT120PCOK()
Local lRet := .T.
Local nOper := PARAMIXB[1]
If nOper == 2 //-- 1 = Chamada via A120LINOK, 2 = Chamada via A120TUDOK
//-- Validações de usuário
lRet := .F.
EndIf
Return lRet