Histórico da Página

Obtém uma resposta do servidor, eventualmente listando erros e informações de status no console do servidor Protheus.

Sintaxe

retValoRedisAfter := oRedisClient:GetReply()

@outParm)

Parâmetros

Retorno

oRedisAfter

* Isto permite acoplar outros métodos e propriedades à chamada de ::GetReply()
   Por exemplo,
      oRedisClient:GetReply(@outParm):lOk

   testará se o comando foi bem sucedido, sem a necessidade de uma consulta à parte a ::lOk sobre o objeto oRedisClient.

Observações

• O método ::GetReply() é associado ao método ::Append(), que enfileira a execução de comandos no servidor Redis, ao passo que ::GetReply() obtém o resultado dessa execução.

• É a parceria entre ::Append() e ::GetReply() que permite a execução assíncrona de comandos,

• em concorrência com a execução do programa: podem-se enfileirar vários comandos através de ::Append() e posteriormente obter seus resultados através de ::GetReply().

• Pode também haver um ganho de desempenho, pois o programa cliente não precisa aguardar a execução no comando no servidor, podendo ocupar esse tempo em outras atividades, para apenas consultar o resultado quando necessário.

• Um ponto importante é que ::GetReply() retornará valores de tipos variados, de acordo com a resposta do comando que foi enviado por ::Append()

• .
  
  
• Para que o programa possa se preparar adequadamente para as respostas recebidas por ::GetReply()

•   – que podem ter sido geradas em ordem indefinida a priori --, é útil conhecer seu tipo. O que pode ser feito consultando-se a propriedade ::nReplyType do objeto tRedisClient.

Exemplos

Exemplo 1 – Execução do comando set do Redis

Toggle Cloak
exclusive true

Veja também

• tRedisClient:Append
• tRedisClient:nReplyType

Exemplos

#include 'protheus.ch'
   
User Function redisTst()
  oRedisCli:= tRedisClient():New()
  
  // Setup Redis connection
  oRedisCli:Connect("tec-clima", 6379, "")
  
  If oRedisClient:lConnected
    // Set the field 'x' to the value 'aaa'
    oRedisCli:Append("set x ?", "aaa")
  
    retVal := oRedisCli:GetReply()
  
    VarInfo("Result of GetReply()", retVal)
  
    oRdClient:Disconnect()
    Return .T.
  EndIf 
  
Return .F.

Veja também

• tRedisClient:Append