Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TM400TOK - Validação da Liberação da Viagem
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Este Ponto de Entrada, localizado no TMSA400 (Liberação de Viagem), é executado na função tudo OK validando a liberação da viagem.
Eventos


 

Programa Fonte 
TMSA400.PRW
Sintaxe

TM400TOK - Validação da Liberação da Viagem ( < nOpc> , < cFilOri> , < cViagem> ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
nOpc Array of Record X
cFilOri Array of Record Filial de Origem X
cViagem Array of Record Numero da viagem X
Retorno
    lRet(logico)
  • Caso o retorno esteja (.F.) você não prossegue com a liberação da viagem e caso o retorno esteja (.T.), a liberação da viagem é realizada normalmente.
Exemplos 
User Function TM400TOK()Local lRet     := .T.Local nOpc  := PARAMIXB[1]Local cFilOri := PARAMIXB[2]Local cViagem := PARAMIXB[3] If nOpc == 4            lRet := .F.            MsgAlert('LIBERAÇÃO NAO PERMITIDA')            MsgAlert('Filial de Origem/Viagem: ' + cFilOri + '/' + cViagem)Endif   Return lRet