Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

Ponto O ponto de entrada que será AF010EXC é executado após selecionar a opção excluir e antes da abertura da tela de exclusão. Se  Caso retornar Verdadeiro, permite a exclusão normalmente, se retornar Falso, a exclusão não será é realizada.Observações

Exemplos

#INCLUDE "Protheus.ch"

User Function AF010EXC()

Local lOk := .T.

If lOk
Alert ("Excluindo")
Else
lOk :=.F.
Alert ("Não será possível excluir!")
Endif

Return lOk

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

Retorno

Lógico. T ou F

Eventos de chamada do Ponto de Entrada

If ExistBlock("AF010EXC")
lOk:= ExecBlock("AF010EXC",.F.,.F.)
EndIfVariáveis

Programa Fonte

ATFA010A.PRW