__SaveRmt

__SaveRmt ( < cIdentificador>, [ Param1], [ Param2], [ ...], [ Param3] ) --> Nil

#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],@var1,@var2,@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],@var1,@var2,@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