Mudanças entre as edições de "PHWhatsApp"

Linha 59: Linha 59:
 
         // Envio via 'GET'                                                     
 
         // Envio via 'GET'                                                     
 
         Rest.Metodo := 'GET';
 
         Rest.Metodo := 'GET';
 
 
         // URL = Host do servidor + Porta + EndPoint                   
 
         // URL = Host do servidor + Porta + EndPoint                   
 
         Rest.URL := 'http://localhost:8083/enviarMensagemTexto';
 
         Rest.URL := 'http://localhost:8083/enviarMensagemTexto';
 
 
         // Informar no cabeçalho os dados criptografados do serviço                                                                                                                                                                                                 
 
         // Informar no cabeçalho os dados criptografados do serviço                                                                                                                                                                                                 
 
         Rest.AddHeader('Authorization', 'Basic cGhzeXM6MTIzNDU2Nzg5');
 
         Rest.AddHeader('Authorization', 'Basic cGhzeXM6MTIzNDU2Nzg5');
 
 
         // número de destino da mensagem                                                                                     
 
         // número de destino da mensagem                                                                                     
 
         Rest.AddParametro('numero', '554797473192');
 
         Rest.AddParametro('numero', '554797473192');
 
 
         // mensagem a ser enviada                                                                                         
 
         // mensagem a ser enviada                                                                                         
 
         Rest.AddParametro('mensagem', 'Tcxxceste de envio de mensagem no whatsapp');
 
         Rest.AddParametro('mensagem', 'Tcxxceste de envio de mensagem no whatsapp');
           
 
 
         Rest.Executar;   
 
         Rest.Executar;   
 
 
         if not Rest.RetornoErro then
 
         if not Rest.RetornoErro then
 
           informacao(Rest.Retorno)
 
           informacao(Rest.Retorno)

Edição das 15h09min de 30 de março de 2021

Conceito

O PHWhatsApp é um integrador do PH ERP que permite realizar o envio de mensagens WhatsApp por meio de API.

Nota

Para utilizar o integrador é necessário entrar em contato com o suporte para solicitar a instalação do serviço do PHWhatsApp em seu servidor.

Configurando o Serviço

Após a instalação do PHWhatsApp é necessário realizar as configurações do servidor, para isso temos que executar o arquivo PHWhatsApp.exe que está na pasta de instalação do PHWhatsApp. Na aba Serviço é possível configurar os dados de acesso da API da integração.

Campos

  • Porta: Identificação da porta liberada para realizar o acesso a API.
  • Usuário: Usuário que será utilizado para realizar a autenticação no serviço.
  • Senha: Senha que será utilizada para realizar a autenticação no serviço.
  • Authorization: Campo leitura que contém os dados de acesso criptografados para a autenticação no servidor.

Opções

  • Autenticar Dispositivo: Essa opção permite realizar a leitura do QRCode do WhatsApp Web para autenticar o dispositivo.
  • Iniciar: Inicia o serviço de aplicação do PHWhatsApp.
  • Parar: Interrompe a execução do serviço do PHWhatsApp.
  • Reiniciar: Reinicia o serviço do PHWhatsApp.

API

  • Método: GET.
  • Autenticação: Basic (Usuário e Senha).

Parâmetros

Nome Tipo Descrição
numero String Número do destinatário da mensagem (DDI+DDD+Número).
mensagem String Mensagem que será enviada

Consumindo a API

Após realizar a configuração do servidor de aplicação, com o serviço iniciado podemos consumir através de script do PHERP a API do PHWhatsApp, para isso utilizaremos o objeto TPHConexaoREST.

Exemplo de utilização

  procedure EnviarMensagemWhatsApp;
  var
    REST: TPHConexaoREST;                      
  begin                
     Rest := NewPHConexaoREST;
     try
       // Envio via 'GET'                                                     
       Rest.Metodo := 'GET';
       // URL = Host do servidor + Porta + EndPoint                  
       Rest.URL := 'http://localhost:8083/enviarMensagemTexto';
       // Informar no cabeçalho os dados criptografados do serviço                                                                                                                                                                                                
       Rest.AddHeader('Authorization', 'Basic cGhzeXM6MTIzNDU2Nzg5');
       // número de destino da mensagem                                                                                     
       Rest.AddParametro('numero', '554797473192');
       // mensagem a ser enviada                                                                                         
       Rest.AddParametro('mensagem', 'Tcxxceste de envio de mensagem no whatsapp');
       Rest.Executar;  
       if not Rest.RetornoErro then
         informacao(Rest.Retorno)
       else
         ErroValidacao(Rest.Retorno);               
     finally
       REST.Free;                      
     end;              
  end;