Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: Q050DEL - Exclusão de Documento


Descrição:

O ponto e entrada Q050DEL é executado após as validações padrões e a confirmação da exclusão do documento e serve para permitir ou não esta ação, viabilizando a implementação de regras customizadas.

Eventos:

Este ponto de entrada permite ou impede a exclusão de um documento conforme o seu retorno.

Programa Fonte:
     QDOA050.PRW


Sintaxe:

Q050DEL - Exclusão de Documento ( [ nOpca ] ) --> Lógico.

Parâmetros:


NomeTipoDescriçãoDefaultObrigatórioReferência
nOpcaNuméricoParâmetro disponível para saber qual opção foi utilizada (Confirmar ou Cancelar). Quando o conteúdo do parâmetro for igual a 1, significa que foi utilizado o botão OK (Confirmar), caso o conteúdo do parâmetro for igual a 2, significa que foi utilizado o botão "Cancelar"



Retorno:
(lógico)
  • Se verdadeiro (.T.), permite a exclusão; Se Falso (.F.), abandona a rotina.


Exemplo.
#INCLUDE "TOTVS.CH"

User Function Q050DEL()
Local nOpcao  := PARAMIXB[1] //Parâmetro disponível para saber qual opção foi utilizada (Confirmar ou Cancelar). 
                             //Quando o conteúdo do parâmetro for igual a 1, significa que foi utilizado o botão OK (Confirmar), 
                             //caso o conteúdo do parâmetro for igual a 2, significa que foi utilizado o botão "Cancelar".
Local lReturn := .T.

 //Regra customizada
If nOpcao == 1 //1 - Confirmou a exclusão do Documento
    lReturn := .F. //O documento não será excluído.
EndIf

Return lReturn