Indexar dados do browse por coluna

Discussão em 'Outros/Diversos' iniciado por jonas, Agosto 18, 2009.

  1. jonas

    jonas Membro Participativo

    Segue um exemplo de como indexar os dados listados em um browse de acordo com a coluna que é clicada:
    Código:
    DEFINE VARIABLE c-Coluna AS CHARACTER  NO-UNDO. 
    DEFINE VARIABLE hHandle AS HANDLE      NO-UNDO. 
    No browse deve-se selecionar a opção "Column-searching",e , criar um evento 'START-SEARCH', e, neste evento colocar os códigos abaixo:
    Código:
    ASSIGN hHandle  = BROWSE-1:CURRENT-COLUMN 
           c-Coluna = hHandle:NAME. 
    
    QUERY BROWSE-1:QUERY-PREPARE("FOR EACH tt-titulo BY " + c-Coluna). 
    QUERY BROWSE-1:QUERY-OPEN(). 

    Caso deseje ordenar em ordem decrescente, inserir o query-prepare desta forma:
    Código:
    QUERY BROWSE-1:QUERY-PREPARE("FOR EACH tt-titulo BY " + c-Coluna + " DESC"). 
    
    Para quem utiliza o ems 2.04, este recurso é utilizado no programa de preparação de borderôs. Dependendo da situação é bastante útil inserir este recurso.
    OSVALDO DE SOUSA ASSIS curtiu isso.
  2. LimBh

    LimBh Sem Pontuação

    Caro Jonas,

    Muito legal está dica!
    E para browser's que foram instanciados em uma smart window, teria o código para criar esta função. O browse master não transfere estas funcionalidades quando é instanciado. Temos que criar novamente na window, se tiver a solução posta aih.
    obrigado.
    Limbh :)

Compartilhe esta Página