Descrição

Ponto de entrada que permite ao usuário validar a reversão de um lançamento contábil.

Observações

O ponto de entrada retorna CT105REV retorna um valor lógico onde o usuário realiza a customização da validação de reversão de um lançamento contábil.

Exemplos

User Function CT105REV()

Local lRet:= .F.

If MsgYesNo ("Deseja prosseguir com a reversão?","Reversão")
lRet:= .T.
Else
lRet:= .F.
Alert ("Reversão não permitida!")
EndIf

Return lRet

Preview

Veja também

 

Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

 

Parâmetros

dDataLanc = Data dos lançamentos
cLote = Lote dos lançamentos
cSubLote = Sub Lote dos lançamentos
cDoc = Número do documento dos lançamentos

Retorno

lRet == .T. - Permite o prosseguimento da reversão
lRet == .F. - Não permite o prosseguimento da reversão

Eventos de chamada do Ponto de Entrada

If lCt105Rev
lRet := ExecBlock("CT105REV",.f.,.f.,{dDataLanc,cLote,cSubLote,cDoc })
EndIf

Variáveis

Local lCt105Rev := ExistBlock("CT105REV")

Programa Fonte

CTBA105.PRW