oziel Posted December 26, 2011 Report Share Posted December 26, 2011 Utilizo o OrdScope(), como está abaixo e tenho o retorno de datas: Inicial e Final. Agora estou precisando tb que seja organizado Data+Nome, já fiz várias tentativas e não obtive sucesso, na reorganização dos Indices tentei Dtos(Consulta)+Nome ... o filtro não funcionou, o browse veio todos os dados do banco. //---- Vejam Criando Indices ----- INDEX ON CONSULTA TAG AT_CONS2 TO ATENDE; ... //---- Data para Filtrar --------------------------------- dData1 = DATE() dDAta2 = DATE() DEFINE DIALOG oDlg RESOURCE "DATA" ... REDEFINE GET oG130 VAR dDATA1 PICTURE '99/99/9999' ID 126 OF oDlg REDEFINE GET oG131 VAR dDATA2 PICTURE '99/99/9999' ID 127 OF oDlg Valid dData2 >= dData1 //---- no final do Browse --------------------------------- ..... Atende->(OrdScope(0,dData1)) Atende->(OrdScope(1,dData2)) ACTIVATE DIALOG oDlg CENTERED RELEASE oFnt RETURN NIL //------------------------------ OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. Editado por - oziel on 27/12/2011 16:51:02 Quote Link to comment Share on other sites More sharing options...
oziel Posted December 26, 2011 Author Report Share Posted December 26, 2011 Utilizo o OrdScope(), como está abaixo e tenho o retorno de datas: Inicial e Final. Agora estou precisando tb que seja organizado Data+Nome, já fiz várias tentativas e não obtive sucesso, na reorganização dos Indices tentei Dtos(Consulta)+Nome ... o filtro não funcionou, o browse veio todos os dados do banco. //---- Vejam Criando Indices ----- INDEX ON CONSULTA TAG AT_CONS2 TO ATENDE; ... //---- Data para Filtrar --------------------------------- dData1 = DATE() dDAta2 = DATE() DEFINE DIALOG oDlg RESOURCE "DATA" ... REDEFINE GET oG130 VAR dDATA1 PICTURE '99/99/9999' ID 126 OF oDlg REDEFINE GET oG131 VAR dDATA2 PICTURE '99/99/9999' ID 127 OF oDlg Valid dData2 >= dData1 //---- no final do Browse --------------------------------- ..... Atende->(OrdScope(0,dData1)) Atende->(OrdScope(1,dData2)) ACTIVATE DIALOG oDlg CENTERED RELEASE oFnt RETURN NIL //------------------------------ OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. Editado por - oziel on 27/12/2011 16:51:02 Quote Link to comment Share on other sites More sharing options...
Theotokos Posted December 26, 2011 Report Share Posted December 26, 2011 citação:Utilizo o OrdScope(), como está abaixo e tenho o retorno de datas: Inicial e Final. Agora estou precisando tb que seja organizado Data+Nome, já fiz várias tentativas e não obtive sucesso, na reorganização dos Indices tentei Dtos(Consulta)+Nome ... o filtro não funcionou, o browse veio todos os dados do banco. //---- Vejam Criando Indices ----- INDEX ON CONSULTA TAG AT_CONS2 TO ATENDE; INDEX ON DTOS(CONSULTA)+NOME ... id=red> ... //---- Data para Filtrar --------------------------------- dData1 = DATE() dDAta2 = DATE() DEFINE DIALOG oDlg RESOURCE "DATA" ... REDEFINE GET oG130 VAR dDATA1 PICTURE '99/99/9999' ID 126 OF oDlg REDEFINE GET oG131 VAR dDATA2 PICTURE '99/99/9999' ID 127 OF oDlg Valid dData2 >= dData1 //---- no final do Browse --------------------------------- ..... Atende->(OrdScope(0,dData1)) Atende->(OrdScope(1,dData2)) Atende->(OrdScope(0,DtoS(dData1)+"")) Atende->(OrdScope(1,DtoS(dData2)+"")) id=red> ACTIVATE DIALOG oDlg CENTERED RELEASE oFnt RETURN NIL //------------------------------ OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. id=quote>id=quote> Quote Link to comment Share on other sites More sharing options...
oziel Posted December 26, 2011 Author Report Share Posted December 26, 2011 Obrigado... Vou testar... OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. Quote Link to comment Share on other sites More sharing options...
LUIS1361303120 Posted December 27, 2011 Report Share Posted December 27, 2011 esse ordscop e rapido mesmo.... eu uso index por numero e pesquiso por data ou por uma string,, isso e possivel com ele,, ou tem que estar indexado pelo que pesquisamos... Quote Link to comment Share on other sites More sharing options...
Theotokos Posted December 27, 2011 Report Share Posted December 27, 2011 citação:esse ordscop e rapido mesmo.... eu uso index por numero e pesquiso por data ou por uma string,, isso e possivel com ele,, ou tem que estar indexado pelo que pesquisamos... id=quote>id=quote>tem que estar indexado pela pesquisa que for realizar. Index NOME... pesquisa por Nome Index DATA... pesquisa por Data etc... Quote Link to comment Share on other sites More sharing options...
oziel Posted December 27, 2011 Author Report Share Posted December 27, 2011 Olha ai... Funcionou perfeito, mais tive que fazer uma alteraçãozinha. Está mostrando com ordem de data e em ord. alfabética. Veja como ficou... Atende->(OrdScope(0,(Dtos(dData1)))) Atende->(OrdScope(1,(Dtos(dData2)))) Grato. OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. 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.