Página 1 de 1

Voltar foco no arquivo anterior

Enviado: 09 Fev 2005 16:24
por matrix
Pessoal é o seguinte:
Digamos que estou em determinado arquivo X (ponto inicial)...........
teclei uma funcão, e esta rotina vai fazer determinados calculos e tauls, até aí blz, aí terminei o resultado desta rotina, gravei onde eu queria, e quero retornar ao (ponto inicial), obtendo a mesma posição de arquivo e indice que ocupava antes, como faço, qual comando usar antes e depois ????

Valeu.

Enviado: 09 Fev 2005 16:54
por Zima
Vou dizer como eu faço:

Digamos que estou trabalhando com o arquivo CLIENTES, INDEXADO PELO NOME:

- antes de abrir outro banco de dados:
regatual=RECNO()
.
.
.
outra rotina, cálculos, etc ...
.
.
.
- para voltar onde parei:
SELECT Clientes
SET ORDER TO 1 // Nome
GO regatual

Espero ter sido claro !

Sds
Zima

Enviado: 09 Fev 2005 16:55
por Dudu_XBase
// para pegar o dbf corrente , posição corrente e indice corrente...
cAlias := alias()
nRecno := recno()
nOrdem := indexord()

// Faço os processos devidos...

// Volto ao que era antes...
Dbselectarea(cAlias)
dbsetorder(nOrdem)
dbgoto(nRecno)