INDEXACAO QUE LEVAVA 15 MINUTOS ESTA LEVANDO 55 MINUTOS

[managercorp]

POR FAVOR ALGUEM PODE ME AJUDAR ??

USAVA ASSIM DEMORAVA 15 MINUTOS
*** BAT
CLIPPER @GMANU /l
pause
EXOSPACE @GMANU.LNK
copy gmanu.exe manutenc.exe
OPTEDIT MANUTENC.EXE -EXTRAMIN 32000 -NOBANNER
*** LNK
FI GmanU
LIB EXTEND,OVERLAY,CLIPPER,DBFCDX,_DBFCDX
OVERLAY CODE
SECTION INTO MANUOVL1.OVL FILE GMANU
BEGINAREA
ENDAREA


*********************
AGORA USANDO ASSIM DEMORA 55 MINUTOS
*** BAT
CLIPPER @GMANUBLK /M /O
BLINKER @GMANUBLK
*** LNK
FILE GMANUBLK,TIMESLIC
OUTPUT MANUTENC
BLINKER INCREMENTAL OFF
BLINKER EXECUTABLE CLIPPER F250
BLINKER PROCEDURE DEPTH 140
BLINKER EXECUTABLE NODELETE
BLINKER EXECUTABLE COMPRESS 1
BLINKER EXECUTABLE EXTENDED
SEARCH BLXCLP52
LIB EXTEND
LIB OVERLAY
LIB CLIPPER
LIB DBFNTX
LIB DBFCDX
LIB _DBFCDX

[Maligno]

Difícil dizer com certeza. A não ser uma coisa: programa em modo protegido não usa overlay. Essa LIB OVERLAY, que eu nunca vi antes, pode ser removida. Tente e depois dê um retorno.

[Maligno]

Aliás, em tempo: aproveite que ninguém ainda postou nas outras duas mensagens e apague-as, pois estão em duplicidade com esta, como você mesmo pode ver.

[gvc]

Isso parece Clipper Summer´87.

Mostre a rotina de indexação.

[managercorp]

***************
AQUI ESTA A MINHA ROTINA DE INDEXACAO, USO CDX, QUANDO COMPILO COM EXOSPACE LEVA 15 MINUTOS, AGORA COM O BLIKER ESTA LEVANDO 55 MINUTOS A QTD DE REGISTRO E DE 1463345 REGISTROS
***************
BARRA()
INDEX ON NUMERO TAG APTO1 TO APTO1 EVAL {|| Mymeter(1) } EVERY MTR_INCREMENT
close all
BARRA()
USE APTO EXCLUSIVE
INDEX ON TIPO TAG APTO2 TO APTO1 EVAL {|| Mymeter(2) } EVERY MTR_INCREMENT
close all
USE APTO EXCLUSIVE
BARRA()
INDEX ON NUMRES TAG APTO3 TO APTO1 EVAL {|| Mymeter(3) } EVERY MTR_INCREMENT
close all
USE APTO EXCLUSIVE
BARRA()
INDEX ON ANDAR TAG APTO4 TO APTO1 EVAL {|| Mymeter(4) } EVERY MTR_INCREMENT
close all
USE APTO EXCLUSIVE
BARRA()
INDEX ON FLAGUH TAG APTO5 TO APTO1 EVAL {|| Mymeter(5) } EVERY MTR_INCREMENT
close all
USE APTO EXCLUSIVE
BARRA()
INDEX ON RAMAL TAG APTO6 TO APTO1 EVAL {|| Mymeter(6) } EVERY MTR_INCREMENT
close all
************************
ATENCAO MAIS UMA VEZ EU DIGO, NAO MUDO NENHUMA LINHA, APENAS MUDO A FORMA DE COMPILAR, COMO DEMONSTREI ACIMA
************************
O MOTIVO DE EU OPTAR PELO BLIKER E QUE COM O EXOSPACE QUANDO EM OUTRO ARQUIVO PASSO DE INDICE 14, O SISTEMA ABORTA E DA UM ERRO, ENTAO OPTEI PELO BLINKER QUE NAO ACONTECE ESSE ERRO, SO QUE A DEMORA TORNA INVIAVEL, TENHO QUASE CERTESA QUE E A FORMA DO SINTAXE DO MEU LNK, ALGUEM PODE ME DAR UM EXEMPLO DE UM LNK.

[managercorp]

TIREO A LIB OVERLAY COMO FOI PEDIDO, MAS NAO ADIANTOU
************

[sygecom]

Alexandre, tente tirar fora do Bloco.
Ex:

Código: Selecionar todos

INDEX ON RAMAL TAG APTO6 TO APTO1 EVAL Mymeter(6) EVERY MTR_INCREMENT

Abraços
Leonardo Machado

[Maligno]

Barra de acompanhamento de progresso de indexação normalmente causa um certo atraso na indexação. Pode postar essa sua função Mymeter()? Ou então faça um teste: nesta função coloque um RETURN antes de qualquer código que ela execute. Você deve notar uma significativa diferença de velocidade.

[managercorp]

ACHO QUE NAO E ISSO NAO CARA VEJA AQUI COM O BLINKER
********************* ASSIM LEVOU 00:01:25
INDEX ON NUMERO TAG APTO1 TO APTO1 EVAL {|| Mymeter(1) } EVERY MTR_INCREMENT
********************* ASSIM LEVOU 00:01:22
INDEX ON NUMERO TAG APTO1 TO APTO1
********************* A DIFERENCA E MUITO PEQUENA
COM EXOSPACE LEVA 00:00:32

[managercorp]

VOLTO A PEDIR, SE ALGUEM TEM AS SINTAXES, COMANDOS CORRETOS
PARA SE FORMAR O LNK COM O BLINKER, ACHO QUE O PROBLEMA E ESSE.
OU O MANUAL DO BLINKER EM PORTUGUES,
********************
OUTRA COISA, ATE AGORA ESTAVA SO NO MEU INDEXADOR, ENTAO RESOLVI COMPILAR TODO O SISTEMA EM DE EXOSPACE AGORA COM O BLINKER, BLZ PASSOU E NAO DEU ERRO NENHUM NA COMPILACAO, GEROU MEU EXECUTAVEL, ATE BEM MENOR DO QUE EU TINHA COM O EXOSPACE, SO QUE TODAS AS MINHAS TELAS FOCARAM LOUCAS, ONDE TEM UM GET NA LINHA 02,00, ELE SAI LA EMBAIXO NA TELA, TODAS AS MINHAS POSICOES DE TELA ELOQUECERAM, O QUE SERA QUE ESTOU APANHANDO TANTO ASSIM DO BLINKER. SEM MUDAR LINHA NENHUMA COMPILO COM O EXOS E DA TUDO CERTO, O PROBLEMA E QUE O EXE FESTA GRANDE DEMAIS E FICA ESPORADICAMENTE DANDO ERRO DE MEMORIA OU STACK FAULT OU ENCOREB ERRO.

[alaminojunior]

POR FAVOR ALGUEM PODE ME AJUDAR ??

USAVA ASSIM DEMORAVA 15 MINUTOS
*** BAT
CLIPPER @GMANU /l
pause
EXOSPACE @GMANU.LNK
copy gmanu.exe manutenc.exe
OPTEDIT MANUTENC.EXE -EXTRAMIN 32000 -NOBANNER
*** LNK
FI GmanU
LIB EXTEND,OVERLAY,CLIPPER,DBFCDX,_DBFCDX
OVERLAY CODE
SECTION INTO MANUOVL1.OVL FILE GMANU
BEGINAREA
ENDAREA


*********************
AGORA USANDO ASSIM DEMORA 55 MINUTOS
*** BAT
CLIPPER @GMANUBLK /M /O
BLINKER @GMANUBLK
*** LNK
FILE GMANUBLK,TIMESLIC
OUTPUT MANUTENC
BLINKER INCREMENTAL OFF
BLINKER EXECUTABLE CLIPPER F250
BLINKER PROCEDURE DEPTH 140
BLINKER EXECUTABLE NODELETE
BLINKER EXECUTABLE COMPRESS 1
BLINKER EXECUTABLE EXTENDED
SEARCH BLXCLP52
LIB EXTEND
LIB OVERLAY
LIB CLIPPER
LIB DBFNTX
LIB DBFCDX
LIB _DBFCDX

Curiosidade:
Que versão do clipper o nobre colega está usando ?
O colega disse que usa CDX, porque a mençao a Lib DBFNTX ?
Como já disse o Maligno, procure não usar mostradores de indexação.
Agora para terminar, verifique se estes seus arquivos não estão corrompidos. Já vi dessas coisas.
Com relação ao script, já está de bom tamanho. Acredito que não seja este o pepino.
Boa sorte