Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TMA340EST - Inibe mensagem de estorno
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: AS/400
Idiomas: Espanhol , Inglês
Descrição: 
Este Ponto de Entrada, localizado no TMSA340 (Encerramento da Viagem), é executado no 'Estorno' de um Encerramento de Viagem. Caso o retorno esteja (.F.) ele impede o estorno inibindo inclusive a mensagem de estorno.
Eventos


 

Programa Fonte 
TMSA340.PRW
Sintaxe

TMA340EST - Inibe mensagem de estorno ( ) --> lRet

Retorno
    lRet(array_of_record)
  • Caso o retorno seja (.F.) impede o estorno.
Observações


 

Exemplos 
User Function TMA340EST()                       Local lRet      := .T.Local cFilOri   := DTQ->DTQ_FILORILocal cViagem   := DTQ->DTQ_VIAGEMIf cViagem == '000014'            lRet := .F.            MsgAlert('Não é permitido estornar a viagem ' +cViagem)EndifReturn lRet