tRedisClient:GetReply

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

Sintaxe

retVal := oRedisClient:GetReply()

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, concorrente 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.

É possível, enfileirar comandos por ::Append(), sem consultar seu resultado por ::GetReply(), o que pode ter vantagens em desempenho.

Exemplos

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

#include 'protheus.ch'
  
User Function ApndTstC()
  Local retVal       := Nil 
  Local outParm      := Nil 
  Local oRedisClient := Nil 
  
  // Alocation of an object tRedisClient 
  oRedisClient:= tRedisClient():New()
 
  // Connection to of client to a server
  oRedisClient:Connect("localhost", 6379, "")
 
  If oRedisClient:lConnected
    // Set the field 'x' to the value 'aaa' and gets reply
    retVal := oRedisClient:Append('set x "aaa"')
    VarInfo("Result of ::Append()", retVal)
    
    retVal := oRedisClient:GetReply(@outParm)
 
    VarInfo("Output of ::GetReply()", outParm)
    VarInfo("Result of ::GetReply()", retVal)
 
    oRedisClient:Disconnect()
    Return .T.
  EndIf
 
Return .F.

Veja também

• tRedisClient:Append