Ver se o arquivo temporário está na memória

[oribeiro]

Pessoal,

Estou trabalhando com arquivos temporários em memória com o hb_dbcreate() assim:

   /////////////////////////////////////////////////
   // Arquivo Temporário, no xHarbour 1.2 Somente //
   // Cria o Arquivo na memória (não usa o Disco) //
   /////////////////////////////////////////////////
   Local _DbfTemp[1]:="ARQTEMP"
   Hb_DbCreate(_DbfTemp[1],{{ "Nombre",    "C", 40, 0 },; // -> Criação do Memory File Temporary com Hb_DbCreateTemp()
                           { "Direccion", "C", 50, 0 },;
                           { "Telefono",  "C", 12, 0 },;
                           { "Edad",      "N",  2, 0 },;
                           { "Productos", "C", 10, 0 },;
                           { "Nivel",     "N",  2, 0 }})

   // Seleciona o Arquivo criado na memória e usa os comandos comuns de tratamento dos registros //
   Select(_DbfTemp[1])
   OADbAppend()
   replace nombre    with "Oscar Ribeiro"
   replace Direccion with "RUA MARCIA PIERRONI, 99"
   replace Telefono  with "55 11 4025-1234"
   DbAppend()
   replace nombre    with "Marco Ribeiro"
   replace Direccion with "RUA MARCIA PIERRONI, 99"
   replace Telefono  with "55 11 4025-1234"
   DbAppend()
   replace nombre    with "Oscar Ribeiro Neto"
   replace Direccion with "RUA MARCIA PIERRONI, 99"
   replace Telefono  with "55 11 4025-1234"
   browse()

   // Cria o indice do arquivo também na memória //
   index on nombre to clientes Memory
   Seek "Marco Ribeiro"
   browse()

   // Fecha o arquivo e Apaga da Memória //
   (_DbfTemp[1])->(DBCLOSEAREA())
   oaDbDrop("MEM:"+_DbfTemp[1])

Entendi que quando fecho o arquivo com DbCloseArea() o arquivo ainda continua na memória, porque eu consigo abrí-lo novamente com DbUseArea() mas preciso saber se existe algum comando que verifica se o arquivo ainda está lá.

Por exemplo, se o arquivo é físico eu uso FILE("ARQTEMP.DBF"), mas com arquivo de memória, existe algum comando similar ao FILE() que verifica se ele está lá?

 

 

[aferra]

// Fecha o arquivo e Apaga da Memória //

acredito que tenha que fazer assim para dar certo

dbSelectArea( _DbfTemp[1] )

   (_DbfTemp[1])->(DBCLOSEAREA())
   DbDrop("MEM:"+Alltrim(_DbfTemp[1]))

 

o alttrim por garantia

[oribeiro]

Obrigado