Linha Microsiga Protheus

Árvore de páginas

Pontos de Entrada para adicionar validações antes da gravação dos dados da Entidade

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

OGA010

Cadastro de Entidades

Ponto de Entrada:OGA010OK

País(es):

Todos

Versões/Release:

11.80.19


Ponto de Entrada

Descrição:Permite ao usuário adicionar validações antes da gravação dos dados da Entidade.

Localização:

PosModelo

Programa Fonte:

OGA010

Função:

OGA010OK

Retorno:

Nome

Tipo

Descrição

Obrigatório

lContinua

Lógico

Parâmetros enviados: {oModel,"PosModelo","OGA010"}

NÃO

  Exemplo:

#Include 'Protheus.ch'
//Ponto de entrada OGA010OK
//Permite ao usuário adicionar validações antes da gravação dos dados da entidade
User Function OGA010OK()
    Local aAreaAtu := GetArea()
    Local lContinua := .T.
    Local oModel := PARAMIXB[1] //Modelo do OGA010
    Local oNJ0 := oModel:GetModel("NJ0UNICO")

    If Empty( oNJ0:GetValue("NJ0_CGC") )
        MSGINFO("PONTO DE ENTRADA _ OGA010OK")

    EndIf

    RestArea( aAreaAtu )
   

    Return lContinua