Descrição

Utilizado para validar se o processamento da rotina deve ser realizado.

Observações

 

#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

 

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)
Define se deverá realizar o processamento da rotina.

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

TMSA500.PRW