kleyber Posted December 13, 2008 Report Share Posted December 13, 2008 Marcelo, Eu entendo a tua pressa em resolver a questão e até concordo contigo em partes, quando se trata de simplesmente mudar o banco de dados. Agora, o fato é que se tu está usando um filtro com SET FILTER, isso se torna lento MEEEEEEESMO e principalmente em rede. Eu te aconselharia a tentar o que o Kapi te disse, pois o Ordscope() funciona muito bem e rápido em rede. Testar o ADS também é uma boa, mas aà vem os custos e repassar custos para o cliente, pra resolver uma situação é um processo um tanto quanto complicado. Teste o OrdScope() e nos diga se te funciona. Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São LuÃs - MA A Ilha dos Amores Quote Link to comment Share on other sites More sharing options...
LUIS1361303120 Posted December 15, 2008 Report Share Posted December 15, 2008 neste caso que nao tem haver com minha duvida: como que eu faria pra usar o ordscope, eu uso um tipo de pesquisa,, e acho rapido,mas sera que o ordscop e melhor do que eu uso: vou mostrar o exemplo: *----------------------------- Function PSLEM( nKey , oGet ) Local cFras, cChave SELE LEI LEI->(OrdSetFocus("LEIPESQ")) cFras := AllTrim( oGet:cTitle ) * cfras := toupper(cfras) cChave:= "'"+CFRAS+"' $PESQ1 .OR. "+"'"+CFRAS+"' $PESQ2 .OR. "+; "'"+CFRAS+"' $PESQ3 .OR. "+"'"+CFRAS+"' $PESQ4 .OR. "+; "'"+CFRAS+"' $PESQ5 .OR. "+"'"+CFRAS+"' $PESQ6 .OR. "+; "'"+CFRAS+"' $PESQ7" * LEI->(xFilter(cChave)) lei->(adssetaof(cchave)) IF EOF() SET FILTER TO lei->(ADSRefreshAOF()) BUCLEI() ENDIF verdLEI() statusl = 1 return nil eu uso o junto com o ads e se fosse para usar o ordscop, como ficaria,, luis Quote Link to comment Share on other sites More sharing options...
oribeiro Posted December 15, 2008 Report Share Posted December 15, 2008 Só para constar minha experiência, eu tive problema de lentidão com servidores de técnologia NT ao usar leitura e gravação de arquivos com comandos FOpen(), FRead(), FWrite(). Eu tinha uma rotina que protegia e desprotegia arquivos DBF com esses comandos que, na rede, virou um caos. Resolvi deixando de usar esses comandos. Um abraço, Oscar Ribeiroid=size4> OASyS Informáticaid=blue>id=size4> Fwh2.7+xHb0.99.60+BCC551+WorkShopid=size1> Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 15, 2008 Author Report Share Posted December 15, 2008 citação:Marcelo, Eu entendo a tua pressa em resolver a questão e até concordo contigo em partes, quando se trata de simplesmente mudar o banco de dados. Agora, o fato é que se tu está usando um filtro com SET FILTER, isso se torna lento MEEEEEEESMO e principalmente em rede. Eu te aconselharia a tentar o que o Kapi te disse, pois o Ordscope() funciona muito bem e rápido em rede. Testar o ADS também é uma boa, mas aà vem os custos e repassar custos para o cliente, pra resolver uma situação é um processo um tanto quanto complicado. Teste o OrdScope() e nos diga se te funciona. Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São LuÃs - MA A Ilha dos Amores id=quote>id=quote>Custo com ADS free???? Onde???? E como faria um OrdScope para Este Filtro. xNOMprd é o que esta sendo digitado na tela. SET FILTER TO xNOMprd $ NOMprd Os Teste com ADS estão se saindo bem mas começou a dar uns erros de Abertura que ainda nao tive tempo de verificar. a Correria ta grande e ainda to com 2 em treinamento aqui ta f!@#$ Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
sygecom Posted December 15, 2008 Report Share Posted December 15, 2008 Kbelo, O Ads tem custo acima de 20 ou 30 micros ou usuarios simultaneo, tens que confirmar com o representante aqui no brasil. Sobre o ORSCOPE() é simples, é só ter um indice com NOMprd ex: USE MEU_DBF ALIAS MEU_APELIDO SHARED NEW INDEX ON NOMprd TAG 1 TO NOME_INDICE SELE MEU_APELIDO DBSETORDER(1) // ORDEM DE ACORDO COM O CAMPO QUE VAI SER FILTRADO ORDScope(0, xNOMprd) ORDScope(1, xNOMprd) DBGOTOP() BROWSE() // AQUI JA VAI APARECER TUDO FILTRADO... Leonardo Machado Porto Alegre-RS Hwgui + Mysql / xHarbour 1.0.0 Quote Link to comment Share on other sites More sharing options...
sygecom Posted December 15, 2008 Report Share Posted December 15, 2008 Para cancelar o filtro: ORDSCOPE(0, Nil ) ORDSCOPE(1, Nil ) Leonardo Machado Porto Alegre-RS Hwgui + Mysql / xHarbour 1.0.0 Quote Link to comment Share on other sites More sharing options...
vagner Posted December 15, 2008 Report Share Posted December 15, 2008 Olá, Lembre-se, o OrdScope(), não fá filtro por parte do campo, nesse seu caso seria melhor, criar um arquivo temporário, ou um Ãndice temporário Vagner Wirts VI Encontro está chegando , não perca Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 16, 2008 Author Report Share Posted December 16, 2008 citação:Olá, Lembre-se, o OrdScope(), não fá filtro por parte do campo, nesse seu caso seria melhor, criar um arquivo temporário, ou um Ãndice temporário Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>Tem certeza??? Aqui ta fazendo. e Ficou ate rapidinho. Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 16, 2008 Author Report Share Posted December 16, 2008 citação:Olá, Lembre-se, o OrdScope(), não fá filtro por parte do campo, nesse seu caso seria melhor, criar um arquivo temporário, ou um Ãndice temporário Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>É verdade... Ele filtra mas somente no os que começam com o campo digitado. Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 16, 2008 Author Report Share Posted December 16, 2008 citação:Olá, Lembre-se, o OrdScope(), não fá filtro por parte do campo, nesse seu caso seria melhor, criar um arquivo temporário, ou um Ãndice temporário Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>Tens como mostrar um exemplo desse indice Temporario??? Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 16, 2008 Report Share Posted December 16, 2008 http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=9353 João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
jef2_tim Posted December 16, 2008 Report Share Posted December 16, 2008 Sinceramente ORDSCOPE nao é solução! A unica solucao real é trocar de banco de dados, sair do DBF. E um paleativo seria usar ADS, ja disseram q é uma maravilha, relatorios e consultas lentos em rede passam a virar bala com o ADS mas infelizmente eu ainda nao consegui fazer isso no meu sistema. Nem ordscope nem nada da jeito nisso nao. DBF em rede é uma porqueira mesmo.... flow Um Xharbraço. Uso Fwh 8.4 (xharbour 1.1) e Xmate Para Compilar Impactus Automação Comercial jef2_timber@hotmail.com (91)-3238-7012 Belem-PA Quote Link to comment Share on other sites More sharing options...
netsys Posted December 16, 2008 Report Share Posted December 16, 2008 Desculpe, mas tenho acompanhado este tópico a alguns dias e queria dar um "pitaco",,,hehehe...quem sabe ajudo.. Discordo um pouco do colega JEF2_Tim....também trabalho com SQL, mas tenho clientes usando DBF com mais de 500.000 registros numa boa... Para Marcelo e Viol, desculpe a pergunta, mas: Se vcs usam CDX, a ordem dos indices já foi definida na criação (tags). Porque não usar um simples SET INDEX TO ou se preferir DBSETINDEX....e depois só DBSETORDER..? Francamente,,, 9.000 registros não faz nem cócegas em rede nenhuma. Só não usem SET FILTER (pelo amor de Deus!)....´. É muuuuito melhor ter Ãndices nos campos pesquisados e fazer um Dbseek(,,.t.) e depois um Copy to (temp local) while... ou DbCopy bla bla bla...mesmo que for num simples ON Change de combobox.... Seria mais fácil vendo o pedaço que código que ficou lento. Abraços Alberto Fw2.4 + Cdx + Workshop + xHarbour 99.50 + Sqllib S.P. Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted December 16, 2008 Report Share Posted December 16, 2008 Pessoal passar o sistema para Mysql e utilizar comandos nativo do SQL é sem duvida alguma uma tendencia que nao tem como fugir, mais as vezes precisamos de solução para ontem, tenho um cliente meu aqui que seu banco de dados ultrapassou um milhão de registro,relatorios que precisavam passar por mais de 10 filtros chegava a demorar coisa de 10 a 15 minutos na rede, li sobre o ADS dai peguei uns 15 dias aqui para tentar colocar o mesmo para funcionar, e o resultado foi coisa impressionante, este mesmo relatorio passou a levar coisa de segundos para impressao...entao fica aqui minha dica... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR 1.1,PELES,XDEV,VLIB,ADS 8.1 Editado por - empresoft on 16/12/2008 21:09:16 Quote Link to comment Share on other sites More sharing options...
vagner Posted December 16, 2008 Report Share Posted December 16, 2008 citação:Tens como mostrar um exemplo desse indice Temporario??? Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. id=quote>id=quote>Olá Inde On Codigo To SeuArquivoTemporário Vagner Wirts VI Encontro está chegando , não perca Quote Link to comment Share on other sites More sharing options...
Guest johnson Posted December 17, 2008 Report Share Posted December 17, 2008 vcs repararam a alta intelingencia do senhor vagner? sempre dá aquela piscadinha,,,,/ tipo eu sei.:wink ...ou nao quero me meter.:wink....mais sempre tem o :wink vai dá esse teu rabo Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 17, 2008 Report Share Posted December 17, 2008 citação: citação:Tens como mostrar um exemplo desse indice Temporario??? Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. id=quote>id=quote>Olá Inde On Codigo To SeuArquivoTemporário Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>Vagner: citação:Jef Vou te dar umas dicas que são obscuras para muitos usuarios do xHarbour. Apartir da versao Beta 1.5 ou seja 0.99.5 foi adicionado ao comando index on alguns parametros novos que nos ajudam muito. Veja Added exteneded INDEX ON parameters TEMPORARY/EXCLUSIVE/FILTERON TEMPORARY -> Quando se usa o index on com o parametro TEMPORARY no final o mesmo cria um indice na memoria do micro. E muito rapido, mas cuidado pois indices muito grande em maquinas com pouco memoria voce ja sabe no que dá. EXCLUSIVE -> Cria um indice sem que o arquivo esteja em modo exclusivo. ( Pelo que entendi foi isso ) FILTERON -> Criar um indice direcionado para filtro no arquivo, assim ele otimiza o uso do parametro FOR E WHILE no indice. Estes parametros não estão documentados, eu os encontrei remechendo no news do xHarbour. Fiz testes com o meu 0.99.5 e funcionam!... Mas para seu problema o interessante e criar um indice temporario com filtro somente para o relatorio, e ao fechar o arquivo ele volta para o indice normal sem necessidade de recria-lo. Marcelo Gomes elitenet@terra.com.br (32) 3728-1288 Muriae - MG FW 2.3C/FWH 2.6/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE Editado por - elitenet on 15/03/2007 21:10:26 id=quote>id=quote>João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
vagner Posted December 17, 2008 Report Share Posted December 17, 2008 citação:vcs repararam a alta intelingencia do senhor vagner? sempre dá aquela piscadinha,,,,/ tipo eu sei.:wink ...ou nao quero me meter.:wink....mais sempre tem o :wink vai dá esse teu rabo id=quote>id=quote>Meu, acho q vc têm um sério problema sexual, pois isso não é questão de inteligência ou não, e sim questão de se fazer, agora ficar ofendendo um ou outro, não resolve, se vc soubesse teria respondido não teria ? Pois bem, se não respondeu é pq NÃO SABE, e se não sabe, o melhor a fazer é manter a boca fechada Vagner Wirts VI Encontro está chegando , não perca Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 17, 2008 Report Share Posted December 17, 2008 citação: citação:vcs repararam a alta intelingencia do senhor vagner? sempre dá aquela piscadinha,,,,/ tipo eu sei.:wink ...ou nao quero me meter.:wink....mais sempre tem o :wink vai dá esse teu rabo id=quote>id=quote>Meu, acho q vc têm um sério problema sexual, pois isso não é questão de inteligência ou não, e sim questão de se fazer, agora ficar ofendendo um ou outro, não resolve, se vc soubesse teria respondido não teria ? Pois bem, se não respondeu é pq NÃO SABE, e se não sabe, o melhor a fazer é manter a boca fechada Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>KKKKKKKKKKKKKKKKKKKKKK. BOA VAGNER!! KKKKKKKKKKKKKKKKKKKKKK. TO DESCONFIADO, QUE MAIS UM VAI SER EXCLUIDO DO NOSSO FORUM... DOU O MAIOR APOIO!! VIVA VAGNER WIRTS!! João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
vagner Posted December 17, 2008 Report Share Posted December 17, 2008 citação:KKKKKKKKKKKKKKKKKKKKKK. BOA VAGNER!! KKKKKKKKKKKKKKKKKKKKKK. TO DESCONFIADO, QUE MAIS UM VAI SER EXCLUIDO DO NOSSO FORUM... DOU O MAIOR APOIO!! VIVA VAGNER WIRTS!! João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>Estou só esperando mais alguma "escorregada" dele, pois se ele está acostumado na casa dele falar palavrão e ofender pessoas, na minha casa não , e posso dizer que o fórum é a minha casa, pois sou ADMINISTRADOR, e só uma pessoa, está acima de mim, que é o dono do fórum (Gilmer). Aà se ele quiser, é só conversar com o Gilmer, ou se sentir ofendido, mas aqui no fórum precisa ter ordem, senão vira bagunça Vagner Wirts VI Encontro está chegando , não perca Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 17, 2008 Author Report Share Posted December 17, 2008 citação:Desculpe, mas tenho acompanhado este tópico a alguns dias Só não usem SET FILTER (pelo amor de Deus!)....´. Abraços Alberto Fw2.4 + Cdx + Workshop + xHarbour 99.50 + Sqllib S.P. id=quote>id=quote>Se acompanhasse ia ver que uso Set Filter to. Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 17, 2008 Author Report Share Posted December 17, 2008 citação: citação: citação:vcs repararam a alta intelingencia do senhor vagner? sempre dá aquela piscadinha,,,,/ tipo eu sei.:wink ...ou nao quero me meter.:wink....mais sempre tem o :wink vai dá esse teu rabo id=quote>id=quote>Meu, acho q vc têm um sério problema sexual, pois isso não é questão de inteligência ou não, e sim questão de se fazer, agora ficar ofendendo um ou outro, não resolve, se vc soubesse teria respondido não teria ? Pois bem, se não respondeu é pq NÃO SABE, e se não sabe, o melhor a fazer é manter a boca fechada Vagner Wirts VI Encontro está chegando , não perca id=quote>id=quote>KKKKKKKKKKKKKKKKKKKKKK. BOA VAGNER!! KKKKKKKKKKKKKKKKKKKKKK. TO DESCONFIADO, QUE MAIS UM VAI SER EXCLUIDO DO NOSSO FORUM... DOU O MAIOR APOIO!! VIVA VAGNER WIRTS!! João Santos - São Paulo. kmt_karinha@pop.com.br kapiaba@brfree.com.br Fone: (11) 3106-2832 FWH 2.7 - xHARBOUR 0.99.61 - WorkShop.Exe id=quote>id=quote>Hum senti que esse cara tem uma Paixão recolhida pelo Vagner. rsrs Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Kbelo Posted December 17, 2008 Author Report Share Posted December 17, 2008 Só para Documentar. ja encerrei esse assunto dei meu Jeito por aqui. Tirei o Filtro incremental. Com DBF não Tem solução. Somente com ADS ou trocar para Banco de Dados. Marcelo Michels marcelo@infototal.com.br celo.michels@hotmail.com xHarbour 1.1 + Fwh 8.01 + WorkShop + Bcc 5.82 + WvwTools + SQLRDD + xMate. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.