Página 1 de 1
INDEXACAO QUE LEVAVA 15 MINUTOS ESTA LEVANDO 55 MINUTOS
Enviado: 22 Ago 2007 15:57
por 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
Enviado: 22 Ago 2007 17:52
por 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.
Enviado: 22 Ago 2007 17:53
por 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.

Enviado: 22 Ago 2007 18:15
por gvc
Isso parece Clipper Summer´87.
Mostre a rotina de indexação.
Enviado: 23 Ago 2007 08:47
por 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.
Enviado: 23 Ago 2007 09:03
por managercorp
TIREO A LIB OVERLAY COMO FOI PEDIDO, MAS NAO ADIANTOU
************
Enviado: 23 Ago 2007 09:05
por 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
Enviado: 23 Ago 2007 10:11
por 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.
Enviado: 23 Ago 2007 12:15
por 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
Enviado: 23 Ago 2007 12:20
por 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.
Re: INDEXACAO QUE LEVAVA 15 MINUTOS ESTA LEVANDO 55 MINUTOS
Enviado: 05 Set 2007 16:18
por alaminojunior
managercorp escreveu: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