Inclusão de Ponto de Entrada
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Serviços | ||||||||
Módulo: | Financeiro | ||||||||
Rotina: |
| ||||||||
Ponto de Entrada: | F677MAIL | ||||||||
Requisito (ISSUE): | PCDEF-96711 | ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos | ||||||||
Versões/Release: | 12.1.7 |
Ponto de Entrada
Descrição: | Permite definir o assunto e mensagem do e-mail que será enviado nas notificações do processo de prestação de contas de viagem, conforme a opção de envio. | ||||||||||||
Localização: | Atualizações / Viagens / Prestação de Contas | ||||||||||||
Eventos: | Prestação de Contas | ||||||||||||
Programa Fonte: | FINA677 | ||||||||||||
Função: | F677MsgMail | ||||||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function F677MAIL()
Local nOpcao := PARAMIXB[1]
Local cAssunto := PARAMIXB[2]
Local cMensagem := PARAMIXB[3]
Local aRet := {'',''}
//Opções de envio (nOpcao)
// 1 - Aviso ao Gestor sobre prestação pendente de aprovação
// 2 - Aviso ao participante sobre prestação reprovada pelo gestor
// 3 - Aviso ao participante sobre prestação reprovada pelo Depto Viagens
// 4 - Aviso ao participante sobre pagamento liberado
// 5 - Aviso ao participante sobre prestação finalizada pelo Depto Viagens
If nOpcao == 1
aRet[1] := "Prestação de Contas - Aprovação"
aRet[2] := "A prestação de contas está pendente de sua aprovação."
Else
aRet[1] := cAssunto
aRet[2] := cMensagem
EndIf
Return aRet