Histórico da Página

...

1. Visão Geral
2. Procedures do Componente
3. Procedures do include ut-treeview.i
4.  
   1. Outras Ações / Ações relacionadas
      
5. Tela XXX
   1. Principais Campos e Parâmetros
      
6. Tabelas utilizadas
7. Exemplo de utilização
8. Telas do TreeView

01. VISÃO GERAL

Este componente TreeView, feito em progress, tem como objetivo substituir o componente TreeView fornecido pelo mscomctrl.ocx, pois este OCX não possui compatibilidade com o OpenEdge 64Bits.

...

// iniciando o treeview
{utp/ut-treeview.i}

IF NOT VALID-HANDLE(h-treeview) THEN DO:
   RUN utp/ut-treeview.w PERSISTENT SET h-treeview.
   
   RUN initializeObject IN h-treeview.
   
   SUBSCRIBE TO "tvNodeEvent" IN h-treeview.
   
   RUN repositionObject IN h-treeview ( 2.65 , 1.30 ) NO-ERROR.
   RUN resizeObject IN h-treeview ( 14.35 , 28.00 ) NO-ERROR.
END.

// esta procedure sera executada toda vez que ocorrer um evento de click em um determinado nó
PROCEDURE pi-ClickTreeView :
    MESSAGE c-codigo-node VIEW_AS ALERT-BOX.
END PROCEDURE.

Programas de exemplo no produto que estão utilizando este componente:

       $/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0370.w

       $/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0430.w

       $/EMS2/Fontes_Doc/Sustentacao/V11/V11/progress/src/wmp/wm0510.w

05.

...

TELAS DO TREEVIEW