__LoadRmt

Recupera o conteúdo das variáveis armazenadas no TOTVS Smart Client com o uso da função __SaveRmt(). Para isso, convém que o número de variáveis armazenadas com a função __SaveRmt() seja o mesmo para a função __LoadRmt(). Se o número for diferente, somente o número de variáveis salvas serão recuperadas.

Sintaxe

__LoadRmt( < cIdentificador >, [ xParam1 ], [ xParam2 ], [ ... ], [ xParam10 ] )

Parâmetros

Nome	Tipo	Descrição	Obrigatório
cIdentificador	caractere	Indica o identificador da lista de variáveis a ser recuperada da memória do TOTVS Smart Client.	X
xParam1	qualquer	Indica a variável que receberá o conteúdo da 1º (primeira) variável armazenada pela função __SaveRmt().
xParam2	qualquer	Indica a variável que receberá o conteúdo da 2º (segunda) variável armazenada pela função __SaveRmt().
...	qualquer	...
xParam10	qualquer	Indica a variável que receberá o conteúdo da 10º (décima) variável armazenada pela função __SaveRmt().

Retorno

Nome	Tipo	Descrição
lRet	lógico	Retorna o status da chamada da função. Verdadeiro (.T.) se a lista existir no TOTVS Smart Client; caso contrário, False (.F.), se a lista não existir.

Observações

O valor do parâmetro <cIdentificador>, utilizado na função __SaveRmt(), deve ser o mesmo utilizado na função __LoadRmt() para recuperar a mesma lista salva.
Comporta de 1 até 10 variável(is) para recuperação por chamada de função (por identificador).
Esta função somente deve ser executada em programas AdvPL que são acionados através do TOTVS Smart Client
Função disponível para a versão do Protheus 8 Remote ou superiores a partir da build 7.00.060322A.

Exemplos

#include "TOTVS.CH"
//-----------------------------------
USER FUNCTION tstTransf()
  // Envia dados para o Protheus Remote
  tstSendData()
  // Recupera dados do Protheus Remote
  tstRcvData()
RETURN
//-----------------------------------
STATIC FUNCTION tstSendData()
  Local var1:= "var1"
  Local var2:= 2
  Local var3:= .T.
  // Cria listas de conteúdo de variáveis na memória do Protheus Remote
  __SaveRmt("myId1",var1,var2,var3)
  __SaveRmt("myId2",var1,var2,var3)
  __SaveRmt("myId3",var1,var2,var3)
  __SaveRmt("myId4",var1,var2,var3)
RETURN
//-----------------------------------
STATIC FUNCTION tstRcvData()
  Local var1:= NIL
  Local var2:= NIL
  Local var3:= NIL
  Local var4:= NIL
  // Obtém lista das listas de contéudo armazenadas no Protheus Remote
  Local aList:= __ListRmt()
  Local i
  For i:=1 to Len(aList)
    QOUT(aList[i])
    // Busca lista de conteúdo de variáveis na memória do Protheus Remote
    __LoadRmt(aList[i],<at:var at:name="var1," />var2,<at:var at:name="var3," />var4)
    QOUT( var1, var2, var3, var4 )
  Next i
  // Excluir a lista "myId1" da lista de memória do Protheus Remote
  __DeleteRmt("myId1")
  // Busca lista de conteúdo de variáveis na memória do Protheus Remote
  aList:= __ListRmt()
  For i:=1 to Len(aList)
    QOUT(aList[i])
    // Busca lista de conteúdo de variáveis na memória do Protheus Remote
    __LoadRmt(aList[i],<at:var at:name="var1," />var2,<at:var at:name="var3," />var4)
    QOUT( var1, var2, var3, var4 )
  Next i
  // Limpa todas as listas armazenadas no Protheus Remote
  __ClearRmt()
  // Obtém lista das listas de contéudo armazenadas no Protheus Remote
  aList:= __ListRmt()
  QOUT( Len(aList) )
RETURN

Abrangência

Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10

Árvore de páginas