Descrição | Utilizado para validar se o processamento da rotina deve ser realizado. |
|---|---|
Observações | |
Preview | |
Veja também | |
Idioma | Português(Brasil) |
Versões | Microsiga_Protheus11 |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Updates | |
Parâmetros | |
Retorno | .T. ou .F.(logico) |
Eventos de chamada do Ponto de Entrada | |
Variáveis | |
Programa Fonte | TMSA500.PRW |
#Include 'Protheus.ch'
User Function TM500OK()
Local nOpcao := PARAMIXB[1]
Local lRet := .T.
If nOpcao = 12
lRet := .F.
MsgAlert("Documento não pode ser anulado")
ElseIf nOpcao = 6
lRet := .F.
MsgAlert("Documento não pode ser complementado")
EndIf
Return lRet |