GPM050CA - Validação para início do cálculo do Vale-Transporte -- 107587

Este ponto de entrada destina-se à validação de usuário, para permitir a execução da rotina do cálculo do vale-transporte.

GPM050CA - Validação para início do cálculo do Vale-Transporte ( [ ] ) --> Variável lógica

Variável lógica(logico)
• Obrigatoriamente deve ser retornado um valor LÓGICO, verdadeiro ou falso (.T. ou .F.)

Caso o retorno não seja do tipo lógico, .T. ou .F., o processamento do cálculo será abandonado e apresentará a mensagem:

Falha no Retorno - Gpm050Ca:

O retorno do ponto de entrada Gpm050Ca não é lógico (.T. ou .F.). 
Para voltar a calcular, efetue o acerto ou exclusão do ponto de entrada do projeto.

User Function Gpm050CaLocal lRet := .F.MSGALERT( "Passou pelo P.E. Gpm050Ca antes de iniciar o cálculo." + Chr(13) + ;		  "O retorno deve ser lógico (.T. ou .F.)." + Chr(13) + ;		  "Cuidado com os procedimentos utilizados!!!",;		  "Gpm050Ca" )lRet := MsgYesNo( "Confirma o Cálculo de Vale Transporte?", "PE - Gpm050Ca" )Return( lRet )