Valida a Exclusão da Conta Contábil
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | SIGACTB | ||||
Rotina: |
| ||||
Parâmetros | nOpc | ||||
Ponto de Entrada: | CT020EXC | ||||
País(es): | Brasil | ||||
Banco(s) de Dados: | Todas | ||||
Sistema(s) Operacional(is): | Todos |
Descrição
O objetivo deste ponto de entrada é validar a exclusão da conta contábil. Caso seu retorno seja .T.(verdadeiro), a conta contábil será excluída; se o retorno for .F.(falso), a conta contábil não será excluída.
Ponto de Entrada
Descrição: | O ponto de entrada CT020EXC é utilizado para validar a exclusão da conta contábil. |
Eventos: | If lRet .And. lCT020Exc lRet:= ExecBlock("CT020EXC",.F.,.F.,nOpc) Endif |
Programa Fonte: | CTBA020 |
Retorno: | Lógico |
Exemplo:
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
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas