Descrição

Ponto de entrada que permite validar a exclusão da conta contábil. Caso seu retorno seja .T.(verdadeiro), a conta contábil será excluída, caso seu retorno seja .F.(falso), a conta contábil não será excluída.

Observações

Exemplos

User Function CT020EXC()

Local lRet := .F.

If MsgYesNo ("Confirma Exclusão?")
lRet:= .T.
MsgAlert("Exclusão Confirmada")
Else
MsgAlert("Exclusão Cancelada")
Endif

Return lRet

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus10_e_Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

nOpc

Retorno

Lógico

Eventos de chamada do Ponto de Entrada

If lRet .And. lCT020Exc
lRet:= ExecBlock("CT020EXC",.F.,.F.,nOpc)
Endif

Variáveis

Programa Fonte

CTBA020.PRW